stringval <- readline("String: ")
intval <- as.integer(readline("Integer: "))