How to scan a string in R

Question

This is just basic arithmetic and conditional work in R, no file included Here\'s the code

val <- scan()
repeat{
type <- scan()
if (type=="luxe&quo