docs/community/samples/serving/helloworld-r/HelloWorld.R

#!/usr/bin/Rscript
TARGET <- Sys.getenv("TARGET", "World")

message = paste("Hello ", TARGET, "!", sep = "")
print(message)