Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Chi-squared tests of independence [m musculoskeletal injuries treated]
Sig_I = c(58,81,61) Sli_I =c(42,19,39) O=c(58,81,61,42,19,39) X <- matrix(c(58,81,61,42,19,39),ncol=3,byrow=TRUE) colnames(X) <- c("Acetaminophen","Ibuprofen","Codeine") rownames(X) <- c(" Significant Improvement"," Slight Improvement") X <- as.table(X) X colSums(X) rowSums(X) colSums(X)*200/sum(X) colSums(X)*100/sum(X) R1= c(colSums(X)*200/sum(X)) R2= c(colSums(X)*100/sum(X)) df= length(O)-1 N=sum(O) E=N*probs # Expected X2 = sum((O-E)^2/E) sum(O^2/E)-N # Chi-squared length(O)-1 # df pchisq(X2,df,lower.tail=FALSE) # p-value qchisq(alpha,df,lower.tail=FALSE) #critical value
run
|
edit
|
history
|
help
0
stats and fats survey histograms
Pie Chart
23-09-2020IntNewtform
For loops Example
Ch. 5: Cookie Chip Sampling
Polynomial Regression
Scatterplot using ggplot Sample
19-08-2020-JacobiSistemaEuler
R functions
Example for barplot