Number:
a <- 10 mode(a)
## [1] "numeric"
typeof(a)
## [1] "double"
str(a)
## num 10
Text:
b <- "word" mode(b)
## [1] "character"
typeof(b)
str(b)
## chr "word"