Advertisement
Guest User

Untitled

a guest
Jun 26th, 2019
156
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.51 KB | None | 0 0
  1. require(kableExtra)
  2. require(dplyr)
  3.  
  4. bold_letters = c(1,0,1)
  5. df = cbind.data.frame("Noms" = c("A", "B", "C"), "var1" = c(1,2,3))
  6.  
  7. df %>%
  8. mutate(Noms = cell_spec(Noms, bold = ifelse(bold_letters==0,FALSE,TRUE))) %>%
  9. kable(format = "latex", escape = F, row.names = F, align = "c")
  10.  
  11. begin{tabular}{c|c}
  12. hline
  13. Noms & var1\
  14. hline
  15. <span style=" font-weight: bold; " >A</span> & 1\
  16. hline
  17. <span style=" " >B</span> & 2\
  18. hline
  19. <span style=" font-weight: bold; " >C</span> & 3\
  20. hline
  21. end{tabular}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement