Install Steam
login | language
简体中文 (Simplified Chinese) 繁體中文 (Traditional Chinese) 日本語 (Japanese) 한국어 (Korean) ไทย (Thai) Български (Bulgarian) Čeština (Czech) Dansk (Danish) Deutsch (German) Español - España (Spanish - Spain) Español - Latinoamérica (Spanish - Latin America) Ελληνικά (Greek) Français (French) Italiano (Italian) Bahasa Indonesia (Indonesian) Magyar (Hungarian) Nederlands (Dutch) Norsk (Norwegian) Polski (Polish) Português (Portuguese - Portugal) Português - Brasil (Portuguese - Brazil) Română (Romanian) усский (Russian) Suomi (Finnish) Svenska (Swedish) Türkçe (Turkish) Tiếng Việt (Vietnamese) Українська (Ukrainian) Report a translation problem
Here -------|
value<-
c(4.23,3.57,3.82,3.65,2.94,3.09,2.8,3.03,2.99,2.92,2.88,2.88,2.94,3.09,2.8,3.03,4.19,3.88,3.74,3.6,3.71,3.64,3.7,3.69,3.38,5.56,5.87,6.25,4.01,3.78,3.8,3.82,4.67,4.18,4.1,4.25)
dh20_713 <- c(rep("dH20_713", 4), rep("Marina_Tap", 4), rep("Xtal_Geyser", 4), rep("Solar_Frac1", 4), rep("Solar_Frac2", 4),
rep("Solar_Frac3", 4), rep("Solar_Frac4", 4), rep("Solar_Frac5", 4), rep("dH2O_714", 4))
my.dataframe<-data.frame(value, dh20_713)
solardisttrue.aov <- aov(value ~ dh20_713, data = my.dataframe)
summary(solardisttrue.aov)
TukeyHSD(solardisttrue.aov)
..._...|..____________________, ,
....../ `---___________----_____|]=
...../_==o;;;;;;;;_______.:/
.....), ---.(_(__) /
....// (..) ), ----"
...//___//
..//___//
.//___//
WE TRUE HOMIES
WE RIDE TOGETHER
WE DIE TOGETHER
send this GUN to everyone you CARE about including me if you care. Count how many