Tabelle: Tabelle

Description Usage Arguments Value Author(s) Examples

View source: R/describe-Tabelle.R

Description

Einfache deskriptive Tabelle die in medizinischen Arbeiten verwendet werden. Die Funktion arbeitet Intern mit aggregate bzw. mit berechne.default() also aggregate(formula, data,FUN).

Tabelle2: html-Output Tabelle(...)

conTest (metrische-Skalen) Hilfsfunktion fuer Tabellen

conTest (Kategorien Nominal-Skalen) Hilfsfunktion fuer Tabellen

Usage

 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
Tabelle(..., output = FALSE)

Tabelle2(..., output = TRUE)

## Default S3 method:
Tabelle(..., formula = NULL, fun = NULL,
  type = c("2", "1", "freq", "freq.ci", "mean", "median", "ci",
  "cohen.d", "effsize", "multiresponse", "describe", "correlation",
  "custom_fun"), caption = "Charakteristik", note = "",
  digits = NULL, APA = FALSE, test = FALSE, na.action = na.pass,
  exclude = NA, include.n = TRUE, include.nr = FALSE,
  include.total = FALSE, include.test = test, max_factor_length = 35,
  measure.name = "value")

## S3 method for class 'lmerModLmerTest'
Tabelle(x, digits = 2, fun = function(x) {   
   c(n = length(x), M = mean(x, na.rm = TRUE), SD = sd(x, na.rm = TRUE)) })

## S3 method for class 'glm'
Tabelle(x, digits = 2, fun = function(x) {     c(n =
  length(x), M = mean(x, na.rm = TRUE)) })

## S3 method for class 'lm'
Tabelle(x, digits = 2, fun = function(x) {     c(n =
  length(x), M = mean(x, na.rm = TRUE), SD = sd(x, na.rm = TRUE)) })

Describe(x, ...)

errate_statistik3(..., type = NULL, caption = "", note = "",
  na.action = na.pass, exclude = NA, include.n = TRUE,
  include.nr = FALSE, include.total = FALSE, include.test = test,
  max_factor_length = 35)

conTest(fml, data, test_name = TRUE)

catTest(fml, data, include.test = "chisq.test")

Arguments

...

Die auszuwertenden Variablen sex, age="mean", usw

formula

An dcast Gruppe ~ .id ist zum Zeilen und Spalten vertauschen

fun

Eigene Function am Berechne

type

1 oder 2 1 ist kurzes Format 2 int lang

caption, note

Uberschrift an Output

digits

Kommastellen

APA

APA2 Style TRUE/FALSE

test, include.test

Signifikanz Test include.test "wilcox.test","u.test", "kruskal.test","h.test", "chisq.test","t.test", "aov", "anova", "SPSS", "Hmisc" "shapiro.test" "KS.test"

na.action, exclude

an Formula

include.n, include.nr, include.total

Anzahl ausgeben

max_factor_length

Fehler bei langen Faktoren abfangen

Value

Tabelle: data.frame oder list mit data.frame Tabelle2: HTML

Author(s)

Wolfgang Peter

Examples

 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
library(dplyr)
library(tidyr)
#names(varana)
#  set_my_options(mittelwert=list(median.style="Quantil")) # ++IQR
varana2 <- varana %>%
  gather(Zeit, Merkfgk, m1:m4) %>%
  mutate(Zeit = factor(Zeit, Cs(m1, m2, m3 , m4), Cs(t0, t1, t2, t3))) %>%
  Label(Merkfgk = "Merkfaehigkeit")

Tabelle(Merkfgk ~ Zeit, varana2)

varana2 %>% Tabelle(Merkfgk, by =  ~ Zeit)
varana %>% Tabelle(m1, m2, m3 , m4)

#- Achtung hier wird eine Liste Ausgegeben
varana %>% Tabelle(
  4:7,
  by =  ~ geschl,
  fun = function(x)
    c(
      n = length(na.omit(x)),
      m = mean(x),
      sd = sd(x)
    )
)

varana2 %>% Tabelle2(Merkfgk, by=~ Zeit)

 Tabelle(
m1[median] + m2[median] + m3[median] + m4[median] ~ geschl,
varana,
APA = TRUE,
include.n = FALSE,
test = TRUE
)

 c(
"wilcox"=Tabelle(alter ~ geschl, varana, APA=TRUE, test="wilcox")[[1]]$statistics[1],
"h.test"=Tabelle(alter ~ geschl, varana, APA=TRUE, test="h.test")[[1]]$statistics[1],
"anova"=Tabelle(alter ~ geschl, varana, APA=TRUE, test="anova")[[1]]$statistics[1],
"t.test"=Tabelle(alter ~ geschl, varana, APA=TRUE, test="t.test")[[1]]$statistics[1],
"hmisc"=Tabelle(alter ~ geschl, varana, APA=TRUE, test="Hmisc")[[1]]$statistics[1]
)
  
  
   Tabelle(alter ~ geschl, varana, APA=TRUE)

Tabelle(alter ~ geschl, varana, include.n=FALSE, APA=TRUE)
Tabelle(alter ~ geschl, varana, include.nr=TRUE, APA=TRUE)
Tabelle(alter ~ geschl, varana, include.total=TRUE, APA=TRUE)
Tabelle(alter ~ geschl, varana, include.test=TRUE, APA=TRUE)

stp4/stp25APA2 documentation built on May 24, 2019, 9:59 p.m.