Skip to content
Snippets Groups Projects
Commit 7e17dc56 authored by Walmes Marques Zeviani's avatar Walmes Marques Zeviani
Browse files

Remove UE e usa por extenso. Faz exemplos serem iguais.

parent b4a9614e
Branches
No related tags found
No related merge requests found
#' @name ZimmermannTb12.26 #' @name ZimmermannTb12.26
#' @title Dados de produtividade de espiguetas #' @title Produtividade de Arroz para Resistência a Insetos
#' @description Ensaio 1 de um experimento em DQL, que avaliou a resistência #' @description Ensaio 1 de um experimento em DQL, que avaliou a
#' a insetos em seis cultivares de arroz, sendo uma delas comum ao #' resistência a insetos em seis cultivares de arroz, sendo uma
#' ensaio 2. Os dados são de produtividade de espiguetas, em gramas. #' delas comum ao ensaio 2. Os dados são de produtividade de
#' espiguetas, em gramas.
#' @format Um \code{data.frame} com 36 observações e 4 variáveis #' @format Um \code{data.frame} com 36 observações e 4 variáveis
#' #'
#' \describe{ #' \describe{
#' #'
#' \item{linha}{Fator de níveis numéricos. Indica em que linha do quadrado a #' \item{linha}{Fator de níveis numéricos. Indica em que linha do
#' UE se encontra.} #' quadrado a unidade experimental está.}
#' #'
#' \item{coluna}{Fator de níveis numéricos. Indica em que coluna do quadrado a #' \item{coluna}{Fator de níveis numéricos. Indica em que coluna do
#' UE se encontra} #' quadrado a unidade experimental está.}
#' #'
#' \item{cult}{Indica a cultivar.} #' \item{cult}{Indica a cultivar.}
#' #'
...@@ -25,24 +26,25 @@ ...@@ -25,24 +26,25 @@
#' @examples #' @examples
#' #'
#' library(lattice) #' library(lattice)
#' library(latticeExtra)
#' library(reshape) #' library(reshape)
#' #'
#' data(ZimmermannTb12.26) #' data(ZimmermannTb12.26)
#' str(ZimmermannTb12.26)
#' #'
#' cast(ZimmermannTb12.26, linha~coluna, value="prod")
#' cast(ZimmermannTb12.26, linha ~ coluna, value = "cult") #' cast(ZimmermannTb12.26, linha ~ coluna, value = "cult")
#' cast(ZimmermannTb12.26, linha ~ coluna, value = "prod")
#' #'
#' levelplot(prod ~ linha + coluna, #' levelplot(prod ~ linha + coluna,
#' data = ZimmermannTb12.26, aspect = "iso", #' data = ZimmermannTb12.26, aspect = "iso",
#' panel = function(x, y, z, subscripts, ...) { #' panel = function(x, y, z, subscripts, ...) {
#' panel.levelplot(x, y, z, subscripts=subscripts) #' panel.levelplot(x, y, z, subscripts = subscripts, ...)
#' panel.text(x, y, ZimmermannTb12.26$cult[subscripts]) #' panel.text(x, y, ZimmermannTb12.26$cult[subscripts],
#' cex = 0.8)
#' panel.text(x, y, z, pos = 1) #' panel.text(x, y, z, pos = 1)
#' }) #' })
#' #'
#' xyplot(prod~cult, data=ZimmermannTb12.26, type=c("p","a"), col="blue", #' xyplot(prod ~ cult, data = ZimmermannTb12.26, type = c("p", "a"),
#' xlab="Cultivar", ylab="Produtividade de Espiguetas", #' xlab = "Cultivares",
#' main="Experimento em DQL") #' ylab = expression("Produtividade de espiguetas"~(g)))
#' #'
NULL NULL
#' @name ZimmermannTb12.27 #' @name ZimmermannTb12.27
#' @title Produtividade de arroz pela resistência a insetos #' @title Produtividade de Arroz para Resistência a Insetos
#' @description Ensaio 2 de um experimento em delineamento quadrado #' @description Ensaio 2 de um experimento em delineamento quadrado
#' latino, que avaliou a resistência a insetos em seis cultivares de #' latino, que avaliou a resistência a insetos em seis cultivares de
#' arroz, sendo uma delas comum ao ensaio 1. Os dados são de #' arroz, sendo uma delas comum ao ensaio 1. Os dados são de
......
linha coluna prod cult linha coluna cult prod
1 1 55 Canastra 1 1 Canastra 55
2 1 52 Bonança 2 1 Bonança 52
3 1 21 CNAs8989 3 1 CNAs8989 21
4 1 30 CNAs8957 4 1 CNAs8957 30
5 1 77 CNA8540 5 1 CNA8540 77
6 1 38 CNAs8818 6 1 CNAs8818 38
1 2 33 CNA8540 1 2 CNA8540 33
2 2 19 CNAs8818 2 2 CNAs8818 19
3 2 55 Bonança 3 2 Bonança 55
4 2 40 Canastra 4 2 Canastra 40
5 2 21 CNAs8957 5 2 CNAs8957 21
6 2 44 CNAs8989 6 2 CNAs8989 44
1 3 77 Bonança 1 3 Bonança 77
2 3 37 CNAs8957 2 3 CNAs8957 37
3 3 49 CNA8540 3 3 CNA8540 49
4 3 21 CNAs8989 4 3 CNAs8989 21
5 3 75 CNAs8818 5 3 CNAs8818 75
6 3 70 Canastra 6 3 Canastra 70
1 4 20 CNAs8818 1 4 CNAs8818 20
2 4 64 Canastra 2 4 Canastra 64
3 4 53 CNAs8957 3 4 CNAs8957 53
4 4 55 Bonança 4 4 Bonança 55
5 4 12 CNAs8989 5 4 CNAs8989 12
6 4 30 CNA8540 6 4 CNA8540 30
1 5 64 CNAs8989 1 5 CNAs8989 64
2 5 44 CNA8540 2 5 CNA8540 44
3 5 48 Canastra 3 5 Canastra 48
4 5 34 CNAs8818 4 5 CNAs8818 34
5 5 62 Bonança 5 5 Bonança 62
6 5 63 CNAs8957 6 5 CNAs8957 63
1 6 52 CNAs8957 1 6 CNAs8957 52
2 6 39 CNAs8989 2 6 CNAs8989 39
3 6 25 CNAs8818 3 6 CNAs8818 25
4 6 50 CNA8540 4 6 CNA8540 50
5 6 71 Canastra 5 6 Canastra 71
6 6 17 Bonança 6 6 Bonança 17
linha coluna prod cult linha coluna cult prod
1 1 79 Bonança 1 1 Bonança 79
2 1 53 CNAs8952 2 1 CNAs8952 53
3 1 27 CNAs8960 3 1 CNAs8960 27
4 1 30 CNAs8938 4 1 CNAs8938 30
5 1 31 CNAs8711 5 1 CNAs8711 31
6 1 39 CNAs8817 6 1 CNAs8817 39
1 2 44 CNAs8938 1 2 CNAs8938 44
2 2 71 CNAs8960 2 2 CNAs8960 71
3 2 88 Bonança 3 2 Bonança 88
4 2 66 CNAs8711 4 2 CNAs8711 66
5 2 48 CNAs8817 5 2 CNAs8817 48
6 2 58 CNAs8952 6 2 CNAs8952 58
1 3 67 CNAs8817 1 3 CNAs8817 67
2 3 67 CNAs8938 2 3 CNAs8938 67
3 3 39 CNAs8711 3 3 CNAs8711 39
4 3 58 CNAs8952 4 3 CNAs8952 58
5 3 10 CNAs8960 5 3 CNAs8960 10
6 3 90 Bonança 6 3 Bonança 90
1 4 20 CNAs8711 1 4 CNAs8711 20
2 4 98 Bonança 2 4 Bonança 98
3 4 55 CNAs8938 3 4 CNAs8938 55
4 4 49 CNAs8817 4 4 CNAs8817 49
5 4 10 CNAs8952 5 4 CNAs8952 10
6 4 33 CNAs8960 6 4 CNAs8960 33
1 5 83 CNAs8952 1 5 CNAs8952 83
2 5 19 CNAs8711 2 5 CNAs8711 19
3 5 66 CNAs8817 3 5 CNAs8817 66
4 5 12 CNAs8960 4 5 CNAs8960 12
5 5 62 Bonança 5 5 Bonança 62
6 5 79 CNAs8938 6 5 CNAs8938 79
1 6 30 CNAs8960 1 6 CNAs8960 30
2 6 50 CNAs8817 2 6 CNAs8817 50
3 6 67 CNAs8952 3 6 CNAs8952 67
4 6 36 Bonança 4 6 Bonança 36
5 6 52 CNAs8938 5 6 CNAs8938 52
6 6 43 CNAs8711 6 6 CNAs8711 43
No preview for this file type
No preview for this file type
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment