# NOT RUN {
library(magrittr)
specials <- '& % $ # \\_ { } ~ \\^ \\'
# }
# NOT RUN {
specials %>% as_spork %>% as_previews
specials %>% gsub(' ','',.) %>% as_spork %>% as_previews
'one joule (Omega) ~ 1 kg*m^2./s^2' %>% as_spork %>% as_previews
# disambiguation for plotmath and latex (see \code{\link[grDevices]{plotmath}}):
'epsilon.varepsilon' %>% as_spork %>% as_previews
'rho.varrho' %>% as_spork %>% as_previews
'Upsilon.Upsilon1' %>% as_spork %>% as_previews
'phi.phi1.varphi' %>% as_spork %>% as_previews
'sigma.sigma1.varsigma.stigma' %>% as_spork %>% as_previews
'theta.vartheta.theta1' %>% as_spork %>% as_previews
'omega.omega1.pi.varpi' %>% as_spork %>% as_previews
# }
Run the code above in your browser using DataLab