====== Dados de solo ======

Dados Base de solo. {{solo.ale.txt|}}

==== Matriz de habitat de solo ====
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)) 

//{{solo.mapa.jpg|}}//

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