n <- length(LETTERS)
while(1){
x <- do.call(paste, c(as.list(LETTERS[sample(1:26, 4, replace=T)]), sep=""))
print(paste(x, "細胞"))
if(x == "STAP"){
print("陽性かくにん!")
print("よかった☆")
break
}
}
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme
List of users who liked
33