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

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

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