CharnetEx1.18: Tempo e Temperatura de uma Rea<c3><a7><c3><a3>o...

Description Format Source Examples

Description

Registro de 35 tempos de rea<c3><a7><c3><a3>o qu<c3><ad>mica em 7 temperaturas diferentes.

Format

Um data.frame com 2 colunas e 35 linhas, em que

temp

Temperatura em graus Celsius

tempo

Tempo de rea<c3><a7><c3><a3>o, em segundos

Source

CHARNET et al. (2008), Cap<c3><ad>tulo 1, exerc<c3><ad>cio 18, p<c3><a1>g. 25; e Cap<c3><ad>tulo 3, exerc<c3><ad>cio 2, p<c3><a1>g. 65.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
data(CharnetEx1.18)
str(CharnetEx1.18)

# detach("package:lattice")
library(ggplot2)

with(CharnetEx1.18, {
    mu <- aggregate(tempo, list(temp), mean)
    des <- aggregate(tempo, list(temp), sd)
    (da <<- data.frame(x = mu$G, mu = mu$x, sd = des$x))
})

ggplot(CharnetEx1.18, aes(x = temp, y = tempo)) +
    geom_point() +
    geom_point(
        aes(x = x - 1, y = mu), data = da,
        col = 4, shape = 15, size = 2.5) +
    geom_segment(
        aes(x = x - 1, y = mu - sd, xend = x - 1, yend = mu + sd),
        arrow = grid::arrow(angle = 90,
                            length = grid::unit(0.05, "inches"),
                            ends = "both"),
        data = da, col = 4) +
    geom_smooth(method = "lm", se = FALSE)

pet-estatistica/labestData documentation built on May 25, 2019, 12:47 a.m.