fact <- 1 for (i in 1:12) { fact = fact * i } print(paste(“The factorial of 12 is”,fact))