rndr_: Render

Description Usage Arguments Details Value Examples

View source: R/rndr.R

Description

Formatiere von Zahlen nach dem APA-Style ( American Psychological Association ).

rndr_percent() Percentages are also most clearly displayed in parentheses with no decimal places: Nearly half (49

Prozent

rndr_corr Correlations are reported with the degrees of freedom (which is N-2) in parentheses and the significance level: The two variables were strongly correlated, r(55) = .49, p < .01.

F-Wert rndr_F()

T-Wert rndr_T() T Tests are reported like chi-squares, but only the degrees of freedom are in parentheses. Following that, report the t statistic (rounded to two decimal places) and the significance level. There was a significant effect for gender, t(54) = 5.43, p < .001, with men receiving higher scores than women.

CFA Confirmatorische Faktoranalyse

Backhaus Multivariate Analysemethoden 11 AuflageSeite 383 GIF Goodness-of-Fit-Index >=.9

AGIF Adjusted-Goodness-of-Fit-Index

SRMR

Chisq_cfa: Moosbrugger, Kelava 2012 Testtheorie 2. Auflage Seite 339 CHISQ Chi-Quadrat/df 0,2, 3

RMSEA Root-Mean-Square-Error of Approximation 0, 0.050, 0.080

CFI Comparative-Fit-Index .970-1.00, .950-.969

NFI Normed-Fit-Index .950-1.00, .900-.949

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
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
rndr_(...)

rndr_median(m, iqr, digits = NULL, ...)

rndr_median_quant(x, digits = NULL, ...)

rndr_median_range(m, iqr, mn, mx, digits = NULL, ...)

rndr_mean(m, s, digits = NULL, ...)

rndr_mean_range(m, s, mn, mx, digits = NULL, ...)

rndr_ods(x, digits = 2)

rndr_percent(x, n = NULL, ...)

rndr_P(p, include.symbol = TRUE, include.bracket = FALSE)

rndr_Stars(p)

rndr_corr(x, p, df)

rndr_r(x, include.symbol = TRUE)

rndr_r2(x, ...)

rndr_r2pseudo(x, ...)

rndr_df(df1, df2 = NULL)

rndr_CI(ci, digits = 2, sep = options()$stp25$apa.style$sep_element,
  sep_1 = options()$stp25$apa.style$brackets[1],
  sep_2 = options()$stp25$apa.style$brackets[2])

rndr_ods_CI(ci, digits = 2,
  sep = options()$stp25$apa.style$sep_element,
  sep_1 = options()$stp25$apa.style$brackets[1],
  sep_2 = options()$stp25$apa.style$brackets[2])

rndr_mean_CI(m, ci, digits)

rndr_F(F_val, df1, df2, p = NULL)

rndr_T(F_val, df1, p = NULL)

rndr_H(F_val, df1, p = NULL)

rndr_BP(F_val, df1, p = NULL)

rndr_DW(F_val, df1, p = NULL)

rndr_W(F_val, p = NULL)

rndr_U(F_val, p = NULL)

rndr_shapiro(F_val, p = NULL)

rndr_lm(F_val, df1, df2, p, r2, ar2)

rndr_X(x, df1, df2 = NULL, p = NULL)

rndr_Chisq(x, df, p)

rndr_Chisq_stars(x, p)

rndr_fischer(x, p)

rndr_gfi_cfa(x)

rndr_agfi_cfa(x)

rndr_rmsea_cfa(x)

rndr_Chisq_cfa(x, df = 1)

rndr_rmsea_cfa(x)

rndr_cfi_cfa(x)

rndr_nfi_cfa(x)

symbol_chi2(output = stp25output::which_output())

Arguments

...

alles an Format2()

m

Mittelwert

digits

Nachkommastellen

x

Obkekt oder vektor

s, iqr

SD,IQR (ein Wert)

n

Anzahl

p

p-Wert

include.symbol, include.bracket

Formatierungs Optionen

df, df1, df2

Freiheitsgrade

ci

Vektor mit zwei Werten

sep, sep_1, sep_2

intern seperator

F_val

Objekt aus einem Test

output

nur intern HTML oder Konsole

percent, style

Formatierung als Prozent oder als Prozent(Anzahl)

percentage_str, null_percent_sign

Formatierungs Optionen

Details

see: http://winvector.github.io/APAsig/APAsig.html http://my.ilstu.edu/~jhkahn/apastats.html https://web2.uconn.edu/writingcenter/pdf/Reporting_Statistics.pdf

Value

Character-String

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
52
53
54
55
rndr_(1.234, 3)

 rndr_mean_range(1,2,3,4)
  rndr_mean (1,2 )
  rndr_median_range(1,2,3,4)
  rndr_median(1,2)

#-- rndr_percent ------------

rndr_percent(c(.2568, 99, 0.02568), c(4, 569, 25), digits = 1)
rndr_percent(10, 3, F, 2)
x <- c(.2568, 99, 0.02568)
n = c(4, 569, 25)
percent = TRUE
digits = options()$stp25$apa.style$prozent$digits[1]
percentage_str = options()$stp25$apa.style$prozent$percentage_str
style = options()$stp25$apa.style$prozent$style
null_percent_sign = options()$stp25$apa.style$prozent$null_percent_sign

rndr_percent(x, percentage_str = "Prozent")

x <- xtabs(~ med + g, hyper)
n <- table(x)
x <- prop.table(n)
rndr_percent(x, n)


hkarz$LAI <- factor(hkarz$lai, 0:1, c("pos", "neg"))
hkarz$Tzell <- cut(hkarz$tzell, 3, c("low", "med", "hig"))
x <- xtabs(~ LAI + Tzell, hkarz)

n <- as.matrix(x)
x <- as.matrix(prop.table(x) * 100)

rndr_percent(x, n)

rndr_percent(data.frame(x), data.frame(n))


rndr_P(c(1,.25,.08,0.05,0.01, .000999, 0.0001))
#    stp25rndr::rndr_P(c(1,.25,.08,0.05,0.01, .000999, 0.0001))
#   "p=1.000" "p=.250"  "p=.080"  "p=.050"  "p=.010"  "p<.001" 
rndr_corr(-.548369,0.005896,55)
  rndr_CI(matrix(c(NA, 1:10, NA), ncol=2))
rndr_T(25.45, 45, .0045)
rndr_H(25.45, 45, .0045)
#capture.output(Hmisc::spearman2(pauli~g, data = rechentest))
 
rndr_gfi_cfa(c(1,.9,.89))
rndr_agfi_cfa(c(1,.9,.89))
rndr_rmsea_cfa(c(1,.9,.89))
rndr_Chisq_cfa(c(0,2,3,2.01,3.4))
rndr_rmsea_cfa(c(0, 0.050, 0.080, .051, .081) )
rndr_cfi_cfa(c(.970,1.00, .950-.969,.8))
rndr_nfi_cfa(c(.950, 1.00, .900,  .949))

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