> grids <- as.integer(readline("Please enter number of grids: ")) Please enter number of grids: 30 > grids [1] 30