r - knitr xtable highlight and add horizontal lines for the same row, -


i using knitr , xtable automate reporting procedure. want highlight few rows of table , have horizontal line right above each row highlighted. .rnw file using reads below:

\usepackage{colortbl, xcolor} \usepackage{longtable}  \begin{document}  <<do_table, results = "asis">>= library(xtable) mydf <- data.frame(id = 1:10, var1 = rnorm(10), var2 = runif(10))  print(xtable(mydf), add.to.row = list(pos = list(0,2), command = rep("\\rowcolor[gray]{0.75}",2)),hline.after=c(0,2)) @  \end{document}

this works fine, however, table working should longtable, if adjust last line of code 

print(xtable(mydf), add.to.row = list(pos = list(0,2), command = rep("\\rowcolor[gray]{0.75}",2)),hline.after=c(0,2),tabular.environment="longtable",floating=false)

the output quite ugly, , rows not highlighted expected. might know answer question?

thanks,

david

you on right track, bit confused: want selected rows highlighted hline and rowcolor? in experience, rowcolor alone looks better, assume in answer below (but use both, append \\hline command).

as bonus, code below assumes use latex booktabs package, gives correctly weighted rules (unlike hline). honest, work booktabs, , couldn't bother adjust code use hline -- if prefer hline, replace \toprule, \midrule , \bottomrule macros \hline.

you seem have missed latex longtables require special header, , need supply element command vector of add.to.row list (this may reason typeset table looks bad).

longtable.xheader <-    paste("\\caption{set table caption.}",      "\\label{tab:setyourlabel}\\\\ ",      "\\toprule ",      attr(xtable(mydf), "names")[1],      paste(" &", attr(xtable(mydf), "names")[2:length(attr(xtable(mydf), "names"))], collapse = ""),      "\\\\\\midrule ",      "\\endfirsthead ",      paste0("\\multicolumn{", ncol(xtable(mydf)), "}{c}{{\\tablename\\ \\thetable{} -- continued previous page}}\\\\ "),      "\\toprule ",      attr(xtable(mydf), "names")[1],      paste("&", attr(xtable(mydf), "names")[2:length(attr(xtable(mydf), "names"))], collapse = ""),      "\\\\\\midrule ",      "\\endhead ",      "\\midrule ",      paste0("\\multicolumn{", as.character(ncol(xtable(mydf))), "}{r}{{continued on next page}}\\\\ "),      "\\bottomrule \\endfoot ",      "\\bottomrule \\endlastfoot ",      collapse = "")

with taken care of, go ahead , print xtable:

print(xtable(mydf),        floating = false, % since longtable never floats       hline.after = null, % hline off since use booktabs       add.to.row = list(pos = list(-1,                                 c(0, 2),                                nrow(xtable(mydf))),                     command = c(longtable.xheader,                                  "\\rowcolor[gray]{0.75}\n",                                 "%")), % comments out spurious \hline xtable       include.rownames = false, % depends on preference       include.colnames = false, % depends on preference       type = "latex",        tabular.environment = "longtable",       % xtable tries escape tex special chars, can annoying       sanitize.text.function = function(x){x},       % not dashes meant math negative sign, set according data       math.style.negative = false)

i hope use of booktabs in answer did not confuse much. keep knitting!


Comments

Post a Comment

Popular posts from this blog

php - Add the correct number of days for each month -

using following function can display years , months between 2 dates, how can add correct days each month array within each month? can't add days manually need account leap years etc. function yearmonth($start_date, $end_date) { $begin = new datetime( $start_date ); $end = new datetime( $end_date); $interval = new dateinterval('p1m'); // 1 month interval $period = new dateperiod($begin, $interval, $end); foreach ( $period $dt ) $years[$dt->format( "y" )][] = $dt->format( "f" ); return $years; } $list = yearmonth("2007-03-24", "2009-06-26"); var_dump($list); since nobody else answered: function yearmonth($start_date, $end_date) { $begin = new datetime( $start_date ); $end = new datetime( $end_date); $interval = new dateinterval('p1d'); // 1 month interval $period = new dateperiod($begin, $interval, $end); $lastmonth = null; $lastyear = null; $aresult = array(); forea...
Read more

java.util.scanner - How to read and add only numbers to array from a text file -

i'm learning java , have question regarding reading file want read numbers file contains strings well. here example of file: 66.56 "3 java 3-43 5-42 2.1 1 and here coding: public class test { public static void main (string [] args){ if (0 < args.length) { file x = new file(args[0]); try{ scanner in = new scanner( new fileinputstream(x)); arraylist<double> test = new arraylist<>(); while(in.hasnext()){ if(in.hasnextdouble()){ double f=in.nextdouble(); test.add(f);} else {in.next();} } catch(ioexception e) { system.err.println("exception during reading: " + e); } } my problem add 66.56,2.1 , 1 doesn't add 3 after "3 or ignores 3-43 , 5-42 can tell me how skip strings , add doubles here? thanks all said 3 ie; "3, 3-43 , 4-42 strings either u read string , split , check number @ " , - or put in space between characters , integers. jvm after compilation tre...
Read more