2 Seleção de dados

Em dados de citrus, freqüentemente ocorrem falhas (a planta não existe efetivamente na posição) ou replante (plantas plantadas posteriormente na posição e tem idade diferente das demais). Em algumas análises, essas plantas (posições) não são consideradas na análise, ou seja, considerar como inesistentes. Isso poderia ser feito trocando os códigos identificadores de plantas nessas condições, por N. Porém, é importante preservar a informação que se tem. Para isso, foi implementada a função select.code(). Esta função pode ser usada para realizar a separação desses dados, identificados por um ou mais códigos. Esse(es) códigos podem ser informados no argumento unselect.cods.

Fazendo a seleção:


  > sg303 <- select.code(cg303, unselect.cods = c("F", "R"))

Inspecionando o objeto:


  > sg303


  Disease plant data in 25 evaluations of
  20 rows of plants and 48 plants in each row.


  > class(sg303)


  [1] "citrus"  "geodata"


  > table.citrus(sg303)


  object
      0     1     2     3
  11079  6897  1363  4286


  > names(sg303)


  [1] "coords"       "data"         "dates"        "n.subst.code"
  [5] "unselect"

Os dados desconsiderados são colocados no elemento unselect, agrupados por cada código:


  > names(sg303$unsel)


  [1] "F" "R"

Cada elemento do elemento unselect contém as coordenadas e os dados das avaliações:


  > names(sg303$unsel$F)


  [1] "coords" "data"


  > sg303$u$F


  $coords
       row col
  [1,] 150  12
  [2,]  90  16
  [3,]  90  20
  [4,]  15  72
  
  $data
      Av1 Av2 Av3 Av4 Av5 Av6 Av7 Av8 Av9 Av10 Av11 Av12 Av13 Av14 Av15 Av16
  60  "F" "F" "F" "F" "F" "F" "F" "F" "F" "F"  "F"  "F"  "F"  "F"  "F"  "F"
  72  "F" "F" "F" "F" "F" "F" "F" "F" "F" "F"  "F"  "F"  "F"  "F"  "F"  "F"
  92  "F" "F" "F" "F" "F" "F" "F" "F" "F" "F"  "F"  "F"  "F"  "F"  "F"  "F"
  342 "F" "F" "F" "F" "F" "F" "F" "F" "F" "F"  "F"  "F"  "F"  "F"  "F"  "F"
      Av17 Av18 Av19 Av20 Av21 Av22 Av23 Av24 Av25
  60  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"
  72  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"
  92  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"  "F"
  342 "F"  "F"  "F"  "3"  "3"  "3"  "3"  "3"  "3"