anova_report | R Documentation |
Print Analysis of Variance report
anova_report(
data,
treatment_col,
value_col,
prior = FALSE,
comparison_method = "Auto",
equally_rep = TRUE,
report = TRUE
)
data |
Data frame containing the treatment, value and other information. |
treatment_col |
Numeric indicating where treatment locates (column number) in data. |
value_col |
Numeric indicating where treatment value (column number) in data. |
prior |
logical. Whether conducted prior comparisons. |
comparison_method |
Default would automaticly choose method. Method of multiple comparison,must be one of "SNK", "Tukey", "bonferroni","LSD" or "Scheffe". |
equally_rep |
Logical. Whether all treatments have same number of replication. |
report |
Logical. If print report to console. Default:TRUE |
anova_report returns list of:
1)basic data description
2)ANOVA model
3)summary of ANOVA model
4)model of multiple comparison
5)difference of multiple comparison
6)letters of multiple comparison, which could be use for visualization.
{
#' Data loading from 'agricolae' package
data("cotton", package = "agricolae")
#' ANOVA report with default settings
anova_results <- anova_report(
data = cotton,
treatment_col = 3,
value_col = 5
)
## Here returns NULL because no significance among groups
## To conduct prior comparisons
anova_results <- anova_report(
data = cotton,
treatment_col = 3,
value_col = 5,
prior = TRUE
)
## Here found no difference among groups, thus change to a more sensitive method
## (maybe illegal, but only as an example)
anova_results <- anova_report(
data = cotton,
treatment_col = 3,
value_col = 5,
prior = TRUE,
comparison_method = "LSD"
)
#' Data loading 'iris' dataset
data("iris")
#' ANOVA report for 'iris' dataset
anova_results <- anova_report(
data = iris,
treatment_col = 5,
value_col = 2
)
### Extract return
### Basic data description
print(anova_results$basicdata)
### ANOVA model
print(anova_results$anova_model)
### Summary of ANOVA model
print(anova_results$anova_summary)
### Model of multiple comparison
print(anova_results$multiple_comparison_model)
### Difference of multiple comparison
print(anova_results$comparison_results)
### Letters of multiple comparison, which could be used for visualization
print(anova_results$comparison_letters)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.