diff --git a/R/table1.R b/R/table1.R index a713984..9d6902a 100644 --- a/R/table1.R +++ b/R/table1.R @@ -1098,10 +1098,11 @@ update_html <- function(x) { sprintf('%s\n\n', topclass, caption), thead0, table.rows(thead, row.labels=rowlabelhead, th=T), - tfoot, '\n\n', paste(sapply(contents, table.rows), collapse=""), - '\n\n') + '\n', + tfoot, + '\n') structure(x, class=c("table1", "html", "character"), html=TRUE, obj=obj) })