간단 테스팅.

입력:
print("test") #문자 출력
print(5*3*3) #간단 산수 출력
print(factorial(5)) #factorial함수로 5! 값 구하기
rep(x="repeat", times=3) #replicate 함수
a <- c(1,3,5,7,9) #벡터 c()함수로 생성하기
print(a) #벡터 a 출력
print(is(a)) #벡터 a의 형 출력
a <- as.integer(a) #벡터 a의 형 변환
print(a)
print(is(a))
print(rep("hey", 3)) #replicate 함수로 hey 문자 3번 반복 출력하기
-------------------------------
출력:
> source('~/R/test151110a.R')
[1] "test"
[1] 45
[1] 120
[1] 1 3 5 7 9
[1] "numeric" "vector"
[1] 1 3 5 7 9
[1] "integer" "numeric"
[3] "vector" "data.frameRowLabels"
[1] "hey" "hey" "hey"