Mapa base
Mapa base dataset Jura Programa: data(jura) plot(prediction.dat[,1],prediction.dat[,2],xlab="Xloc(km)",ylab="Yloc(km)",main="Mapa Base...
Sumário da variável
Programa: data(jura) cobalto<-prediction.dat$Co summary(cobalto) Resultado: Mínimo: 1.552 ppm 1º Quartil: 6.520 ppm Mediana: 9.760...
Histograma
Programa: data(jura) x.norm<-prediction.dat$Co h<-hist(x.norm,breaks=15) xhist<-c(min(h$breaks),h$breaks) yhist<-c(0,h$density,0) ...
Box-plot
Programa: data(jura) h<-prediction.dat boxplot(h$Co,range=1.5,name=c("Co"),ylab="Teor de cobalto (ppm)",main="Box-plot (Cobalto)")...
Variograma Experimental (omnidirecional)
Programa: data(jura) g<-gstat(id="Co",formula=Co~1,locations=~Xloc-Yloc,data=prediction.dat) graf<-variogram(g)...
Variograma ajustado
Para o ajuste do variograma anterior é necessário fazer um chute do efeito pepita, patamar e alcance para o modelo esférico. Os valores...
Mapa de concentração
O mapa foi feito através do programa de krigagem ordinária. Programa: data(jura) jura.grid <- juragrid.dat coordinates(jura.grid)=~Xloc+Y...