sentence <- "hello"
sentence2 <- "world!"
pigLatin <- function(x){
size <- nchar(x)
newSentence <- paste(substr(x,size-1,size),substr(x,1,size-2),sep="")
return(newSentence)
}
print(pigLatin(sentence))
print(pigLatin(sentence2))
반응형
'학습 > 공통,미분류' 카테고리의 다른 글
| Vagrant Study (0) | 2021.05.10 |
|---|---|
| 안드로이드 자주쓰는 코드 (0) | 2018.07.30 |
| R 프로그래밍 데이터프레임 만들기 (0) | 2017.03.30 |
| 프로그래밍 공부하기 좋은 소스들 (1) | 2017.03.25 |
| www.nodeschool.io (0) | 2015.04.03 |