Test if input is a string
test_string(x)
x
input to be tested
error
library(agricolaeplotr) test_string('smallstring')