janeiro<-matrix(0,10,2)
fevereiro<-matrix(0,10,2)
marco<-matrix(0,10,2)
abril<-matrix(0,10,2)
maio<-matrix(0,10,2)
junho<-matrix(0,10,2)
julho<-matrix(0,10,2)
agosto<-matrix(0,10,2)
setembro<-matrix(0,10,2)
outubro<-matrix(0,10,2)
novembro<-matrix(0,10,2)
dezembro<-matrix(0,10,2)
for (i in 1:10){
janeiro[i,1]<-dados$Cananeia[1+(i-1)*12]
janeiro[i,2]<-dados$Ubatuba[1+(i-1)*12]
}
for (i in 1:10){
fevereiro[i,1]<-dados$Cananeia[2+(i-1)*12]
fevereiro[i,2]<-dados$Ubatuba[2+(i-1)*12]
}
for (i in 1:10){
marco[i,1]<-dados$Cananeia[3+(i-1)*12]
marco[i,2]<-dados$Ubatuba[3+(i-1)*12]
}
for (i in 1:10){
abril[i,1]<-dados$Cananeia[4+(i-1)*12]
abril[i,2]<-dados$Ubatuba[4+(i-1)*12]
}
for (i in 1:10){
maio[i,1]<-dados$Cananeia[5+(i-1)*12]
maio[i,2]<-dados$Ubatuba[5+(i-1)*12]
}
for (i in 1:10){
junho[i,1]<-dados$Cananeia[6+(i-1)*12]
junho[i,2]<-dados$Ubatuba[6+(i-1)*12]
}
for (i in 1:10){
julho[i,1]<-dados$Cananeia[7+(i-1)*12]
julho[i,2]<-dados$Ubatuba[7+(i-1)*12]
}
for (i in 1:10){
agosto[i,1]<-dados$Cananeia[8+(i-1)*12]
agosto[i,2]<-dados$Ubatuba[8+(i-1)*12]
}
for (i in 1:10){
setembro[i,1]<-dados$Cananeia[9+(i-1)*12]
setembro[i,2]<-dados$Ubatuba[9+(i-1)*12]
}
for (i in 1:10){
outubro[i,1]<-dados$Cananeia[10+(i-1)*12]
outubro[i,2]<-dados$Ubatuba[10+(i-1)*12]
}
for (i in 1:10){
novembro[i,1]<-dados$Cananeia[11+(i-1)*12]
novembro[i,2]<-dados$Ubatuba[11+(i-1)*12]
}
for (i in 1:10){
dezembro[i,1]<-dados$Cananeia[i*12]
dezembro[i,2]<-dados$Ubatuba[i*12]
}
boxplot(janeiro[,1],fevereiro[,1],marco[,1],abril[,1],maio[,1],junho[,1],julho[,1],agosto[,1],setembro[,1],outubro[,1],novembro[,1],dezembro[,1])
boxplot(janeiro[,2],fevereiro[,2],marco[,2],abril[,2],maio[,2],junho[,2],julho[,2],agosto[,2],setembro[,2],outubro[,2],novembro[,2],dezembro[,2])


