Dados de solo

Dados Base de solo. solo.ale.txt

dados de solo no arquivo solo.ale.txt

read.table(“solo.ale.txt”,header=T, sep=“\t”, as.is=T)→solo

str(solo)

'data.frame':   256 obs. of  7 variables:
$ col  : chr  "A" "A" "A" "A" ...
$ row  : int  0 1 2 3 4 5 6 7 8 9 ...
$ quad : chr  "A00" "A01" "A02" "A03" ...
$ ntree: int  62 51 80 69 62 73 65 57 47 55 ...
$ soil : chr  "neo" "neo" "trans" "esp.aren" ...
$ pred : chr  "total" "total" "" "total" ...
$ tipo : num  1 1 2 3 3 3 3 3 3 3 ...

unique(solo$soil)

[1] "neo"      "trans"    "esp.aren" "esp.hist"

solo$tipo[solo$soil==“neo”]=1

solo$tipo[solo$soil==“trans”]=2

solo$tipo[solo$soil==“esp.aren”]=3

solo$tipo[solo$soil==“esp.hist”]=4

solo$tipo

[1] 1 1 2 3 3 3 3 3 3 3 3 3 2 3 3 3 1 1 2 3 3 3 3 3 3 3 3 2 4 3 3 3 1 1 1 3 3
[38] 3 3 3 3 3 3 3 2 3 3 3 1 1 1 3 3 3 3 3 3 3 3 3 2 2 3 3 1 1 1 2 3 3 3 3 3 3
[75] 3 2 4 2 3 3 1 1 1 1 3 3 3 3 3 3 2 4 4 4 3 3 1 1 1 1 3 3 3 3 3 3 2 4 4 4 3
[112] 3 1 1 1 1 2 3 3 3 3 3 3 2 4 4 2 3 1 1 1 1 2 3 3 3 3 3 3 2 4 4 2 3 1 1 1 1
[149] 1 3 3 3 3 3 3 3 2 4 2 3 1 1 1 1 1 2 3 3 3 3 3 3 3 2 2 3 1 1 1 1 1 2 3 3 3
[186] 3 3 3 3 3 3 3 1 1 1 1 1 1 2 3 3 3 3 3 3 3 3 3 1 1 1 1 1 1 2 3 3 3 3 3 3 2
[223] 2 3 1 1 1 1 1 1 3 3 3 3 3 3 3 2 2 3 1 1 1 1 1 1 3 3 3 3 3 3 3 2 2 3

matrix(solo$quad,16,16,byrow=F)→ matsolo

image(t(matsolo))

##produz a imagem gráfica dos habitats de solo ####