R ) 사용자 정의 함수 function() 알아보기 in r

안녕하세요

 

오늘은 R의 사용자 정의 함수 function()에 대해서 공부한것을 기록하려고 합니다.

 

R에서는 function()함수를 이용해 제가 사용하고 싶은 함수를 정의해 사용할 수 있습니다.

 

fun <- function(a,b){
c <- a^3+b^4
return(c)
}
fun(1,2)

위 처럼 function을 정의해서 사용가능하며 이때 반환하고자 하는 값을 return으로 정해주어야 합니다.

 

function을 이용한 예제로 구구단을 출력하는 코드를 만들어 보도록 하겠습니다.

gugudan<- function(a){
cat(a,"단")
cat("\n")
for(i in 1:9){
cat(a,"X",i,"=",a*i)
cat("\n")
}
}
gugudan(2)
gugudan(3)

위에선 값을 반환하는게 아닌 그저 출력만 해주면 되기에 return은 쓰지 않았습니다.

 

function을 이용해 숫자를 맞추는 예제도 만들어보겠습니다.

test<- function(){
target <- sample(x=1:100,size=1)
while(T){
num <- readline(prompt = "숫자를 입력하세요")
if(target==num){
print("정답입니다")
break()
}else if(target<num){
print("작은 숫자를 넣어주세요")
}else{
print("더 큰 숫자를 넣어주세요")
}
}
}
test()