foo <- c('#','$%^','&_{','}~\\')
bar <- data.frame(
stringsAsFactors = FALSE,
a = as.numeric(factor(foo)),
b = foo,
c = factor(foo)
)
reserve(bar)
# as.pdf(bar, wider = 10)
# as.pdf(bar, target = '#') # fails
Run the code above in your browser using DataLab