Description Usage Arguments Details Value Author(s) Examples
HTML : htmlTable::htmlTable
Output.xtable mit xtable lassen sich alternativ r-Objekte ausgeben.
Output.htmlTable: Verarbeitet htmlTable-Objekt als auch Listen oder auch einfach nur ein string. Die Tabelle mit Header usw ist dabei schon vorbereitet. Bei Markdown kommt output=FALSE
Output fur apaTables-Objekte wie zB apa.reg.table
Output.iste: einzeln in einen data.frame transformieren
Output.matrix: umwandeln in einen data.frame
Output.stp25: experimenteller Prototyp
Output mit knitr::kable Funftioniert nur wenn options(knitr.table.format = "latex") gesetzt wird (das gilt nur fuer Pdf)
Output.xtabs und Output.tabl und Output.ftable fuer Tabellen Objekte
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 | Output(x, ...)
## S3 method for class 'xtable'
Output(
x,
caption = attr(x, "heading"),
digits = attr(x, "digits"),
output = which_output(),
...
)
## S3 method for class 'character'
Output(x, output = which_output(), ...)
## S3 method for class 'vector'
Output(x, output = which_output(), ...)
## S3 method for class 'htmlTable'
Output(x, output = which_output(), ...)
## S3 method for class ''NULL''
Output(x, ...)
## Default S3 method:
Output(x, ...)
## S3 method for class 'psychobject'
Output(x, digits = c(2, 2, 1, 3, 2, 2), ...)
## S3 method for class 'emmGrid'
Output(
x,
caption = "Estimated marginal means",
note = "Least-squares means",
...
)
## S3 method for class 'apa_table'
Output(x, output = which_output())
## S3 method for class 'list'
Output(x, output = which_output(), ...)
## S3 method for class 'matrix'
Output(x, output = which_output(), ...)
## S3 method for class 'stp25'
Output(x, output = which_output(), ...)
add_row_df(x, add_row = NULL)
Output_kable(x, ...)
## S3 method for class 'list'
Output_kable(x, ...)
## Default S3 method:
Output_kable(
x,
caption = NULL,
col.names = colnames(x),
booktabs = TRUE,
latex_options = c("hold_position"),
note = NULL,
output = which_output(),
print_col = NULL,
fix_colnames = options()$stp25$language != "",
...
)
## Default S3 method:
Text(x, ...)
## S3 method for class 'character'
Text(..., style = 0, char = "-", output = which_output())
## S3 method for class 'table'
Output(x, caption = attr(x, "caption"), note = attr(x, "note"), ...)
## S3 method for class 'xtabs'
Output(x, caption = attr(x, "caption"), note = attr(x, "note"), ...)
## S3 method for class 'ftable'
Output(x, caption = attr(x, "caption"), note = attr(x, "note"), ...)
|
x |
Objekt liste oder Dataframe |
... |
weitere Einstellungen |
output |
FALSE = NULL, TRUE = print, "html" = htmlTable(), "markdown_html"= htmlTable(), "markdown"= kable(), "text"=kable(... "pandoc") und "word"= flextable() |
add_row |
list (c("Erste Zeile" = 1, "Dritte" = 3)) |
col.names |
Output_kable: fuer tintPdf format = "latex" |
booktabs, latex_options |
kable an Latex latex_options = c("hold_position"), latex_options = "scale_down" |
markdown: knitr::kable -> kableExtra::kable_styling
Text: knitr::kable
Word: knitr::kable(x, format = "pandoc")
Output_word() flextable::regulartable
HTML oder Textausgabe
Wolfgang Peter
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 | require(xtable)
## Load example dataset
data(tli)
## Demonstrate aov
fm1 <- aov(tlimth ~ sex + ethnicty + grade + disadvg, data = tli)
fm1.table <- xtable(fm1)
Output(fm1.table)
# ## Demonstrate lm
fm2 <- lm(tlimth ~ sex*ethnicty, data = tli)
fm2.table <- xtable(fm2)
fm2b <- lm(tlimth ~ ethnicty, data = tli)
Output(fm2.table)
Output(xtable(anova(fm2)))
Output(xtable(anova(fm2b, fm2)))
warp.lm <- lm(breaks ~ wool * tension, data = warpbreaks)
x <- emmeans::emmeans(warp.lm, ~ wool | tension)
Output(x)
## Not run:
library(apaTables)
basic.reg <- lm(sales ~ adverts + airplay, data=album)
apa.reg.table(basic.reg) %>% Output()
lm_output <- lm(libido ~ dose, data=viagra)
apa.aov.table(lm_output) %>% Output()
APA_Table(lm_output)
APA_Table( aov(libido ~ dose, data=viagra))
block1 <- lm(sales ~ adverts + airplay, data=album)
block2 <- lm(sales ~ adverts*airplay, data=album)
apa.reg.table(block1, block2) %>% Output()
## End(Not run)
df <- data.frame(
Source = c("A", "B", "C", "F"),
x = 1:4,
y = 1:4,
stringsAsFactors = FALSE
)
# add_row_df(df, c("Erste Zeile" = 1, "Dritte" = 3))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.