R Program to Check Prime Number

num = as.integer(readline(prompt="Enter a number: "))
flag = 0
if(num > 1) {
for(i in 2:(num-1)) {
if ((num %% i) == 0) {
flag = 1
break
}
}
}
if(flag == 0) {
print(paste(num,"is a prime number"))
} else {
print(paste(num,"is not a prime number"))
}