# NOT RUN {
# the following is identical but the former is more convenient:
file <- tempfile("styler", fileext = ".R")
utf8::write_lines_enc("1++1", file)
style_file(file, style = tidyverse_style, strict = TRUE)
style_file(file, transformers = tidyverse_style(strict = TRUE))
utf8::read_lines_enc(file)
unlink(file)
# }
Run the code above in your browser using DataLab