Published on 28 April 2022 (Updated: 05 February 2023)

Welcome to the Factorial in R page! Here, you’ll find the source code for this program as well as a description of how the program works.

Current Solution

args<-commandArgs(TRUE)if(length(args)>0){a=args[1]# Check if String or numeral only, ..numbers_only<-function(a)!grepl("\\D",a)if(numbers_only(a)==TRUE){if(a==0){cat("1")}elseif(a>0){fact=1for(iin1:a){fact=fact*i}cat(fact)# else a < 0}else{cat("Usage: please input a non-negative integer")}# Negative Input}else{cat("Usage: please input a non-negative integer")}# Empty Command Line Param}else{cat("Usage: please input a non-negative integer")}