R solving hackerrank challenge

Question

I would like to solve the challenge. The language of my preference is R. I am not sure how to receive input. On hackerrank coding window it says that

\"# En         


        

Answer 1

Another approach:

con = file('stdin', open ='r')
input  = readLines(con)
z = c()
for(i in 2:length(input)){
  z = c(z, as.numeric(input[[i]]))
}

cat(format(round(sum(z)/2, 1), nsmall = 1), sep = "\n")