Я заинтересован в печати таблицы, где каждая вторая строка окрашена на основе значения в ячейке по сравнению с другими значениями в том же столбце.
Цель состоит в том, чтобы получить вывод в виде латексной таблицы, я думаю, что это можно сделать с помощью formattable и kableExtra. Я не уверен, как соединить эти два для результата Im после.
Минимальные примерные данные:
df <- data.frame(Group = c("1.a","1.a","2.b","2.b","3.c","3.c"),
var1 = c("1(ref)",35,"0.6 (0.5,0.7)",25,"0.7 (0.6,0.9)",20),
stringsAsFactors = FALSE)
Я хочу получить аналогичный вывод для этого, но в виде латексной таблицы, которая может быть напечатана для слова или PDF.
Код для рисунка:
library(formattable)
formattable(df, list(area(row = seq(2, nrow(df), by=2), col = var1 ) ~
color_tile("transparent", "pink")
))
Некоторые ссылки на похожее форматирование, однако нет примера «условного форматирования каждой второй строки». Здесь и здесь .