complete server.r

fixed confidence level mistake