25 qplotcl dataalgaet geomhistogram qqnormalgaetcl

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: ) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") > qqnorm(algaet$Cl) > qqline(algaet$Cl) -2 -1 0 1 2 3 Theoretical Quantiles 0 0 100 200 Cl 300 400 9 Statistics 503, Spring 2013, ISU 9 300 0 20 200 40 100 Sample Quantiles Cl count 5"%$2/2# 400 Normal Q-Q Plot 60 -3 > > > > > > > > > > > > > > > > > > > > # Transformations library(ggplot2) qplot(Cl, data=algae, geom="histogram") qqnorm(algae$Cl) qqline(algae$Cl) par(pty="s") qqnorm(algae$Cl) qqline(algae$Cl) qplot(Cl, data=algae, geom="histogram") algaet <- algae algaet$Cl <- sqrt(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") > qqnorm(algaet$Cl) > qqline(algaet$Cl) ^(0.5) -2 -1 0 1 2 3 Theoretical Quantiles 0 0 100 200 Cl Statistics 503, Spring 2013, ISU 300 400 9 9 300 0 20 200 40 100 Sample Quantiles Cl count 5"%$2/2# 400 Normal Q-Q Plot 60 -3 # Transformations library(ggplot2) qplot(Cl, data=algae, geom="histogram") qqnorm(algae$Cl) qqline(algae$Cl) par(pty="s") qqnorm(algae$Cl) qqline(algae$Cl) qplot(Cl, data=algae, geom="histogram") algaet <- algae algaet$Cl <- sqrt(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") ^(0.5) > qqnorm(algaet$Cl) > qqline(algaet$Cl) -2 -1 0 1 2 3 Theoretical Quantiles 0 0 100 0 5 15 count > > > > > > > > > > > > > > > > > > > > 200 300 400 10 15 20 Cl 10 5 0 Cl 9 Statistics 503, Spring 2013, ISU 9 300 0 20 200 40 100 Sample Quantiles Cl count 5"%$2/2# 400 Normal Q-Q Plot 60 -3 > qqnorm(algaet$Cl) > qqline(algaet$Cl) 20 Cl 300 400 10 15 200 10 100 3 Theoretical Quantiles 5 0 15 Sample Quantiles ^(0.5) 0 Normal Q-Q1Plot -2 -1 0 2 0 # Transformations library(ggplot2) qplot(Cl, data=algae, geom="histogram") qqnorm(algae$Cl) qqline(algae$Cl) par(pty="s") qqnorm(algae$Cl) qqline(algae$Cl) qplot(Cl, data=algae, geom="histogram") algaet <- algae algaet$Cl <- sqrt(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") count > > > > > > > > > > > > > > > > > > > > 5 -3 -2 -1 0 1 2 3 Theoretical Quantiles 0 0 5 10 Cl Statistics 503, Spring 2013, ISU 15 20 9 9 300 0 20 200 40 100 Sample Quantiles Cl count 5"%$2/2# 400 Normal Q-Q Plot 60 -3 20 300 400 10 15 Cl 10 200 5 -3 -2 -1 0 1 2 3 Theoretical Quantiles log > qqnorm(algaet$Cl) > qqline(algaet$Cl) 100 3 Theoretical Quantiles 5 0 15 Sample Quantiles ^(0.5) 0 Normal Q-Q1Plot -2 -1 0 2 0 # Transformations library(ggplot2) qplot(Cl, data=algae, geom="histogram") qqnorm(algae$Cl) qqline(algae$Cl) par(pty="s") qqnorm(algae$Cl) qqline(algae$Cl) qplot(Cl, data=algae, geom="histogram") algaet <- algae algaet$Cl <- sqrt(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") count > > > > > > > > > > > > > > > > > > > > 0 0 5 10 Cl 15 20 9 Statistics 503, Spring 2013, ISU 9 300 0 20 200 40 100 Sample Quantiles Cl count 5"%$2/2# 400 Normal Q-Q Plot 60 -3 > qqnorm(algaet$Cl) > qqline(algaet$Cl) log 20 300 400 10 15 Cl 10 200 3 Theoretical Quantiles 5 100 Sample Quantiles 0 15 Normal Q-Q1Plot -2 -1 0 2 0 ^(0.5) 0 count # Transformations library(ggplot2) qplot(Cl, data=algae, geom="histogram") qqnorm(algae$Cl) qqline(algae$Cl) par(pty="s") qqnorm(algae$Cl) qqline(algae$Cl) qplot(Cl, data=algae, geom="histogram") algaet <- algae algaet$Cl <- sqrt(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- log10(algae$Cl) qplot(Cl, data=algaet, geom="histogram") qqnorm(algaet$Cl) qqline(algaet$Cl) algaet$Cl <- algae$Cl^(0.25) qplot(Cl, data=algaet, geom="histogram") 5 -3 -2 -1 0 1 2 3 Theoretical Quantiles 2...
View Full Document

This note was uploaded on 02/06/2014 for the course STAT 503 taught by Professor Staff during the Fall '08 term at Iowa State.

Ask a homework question - tutors are online