myString <- "Hello world!     -  R.jsrun.net"

print ( myString)

qbinom(0.99,50,0.4)
pbinom(28,50,0.4)
pbinom(27,50,0.4)