Skip to main content
adicionou 1555 caracteres ao conteúdo
Fonte Link
Bruna
  • 227
  • 1
  • 9
media_diaria <- df %>%
  group_by(mes) %>%
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

Viewdput(media_diaria)
structure(list(mes = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12), 
    x1 = c(34, 31, 29, 29, 34.6666666666667, 40, 31.3333333333333, 
    22, 31.3333333333333, 28.6666666666667, 24, 28), x4 = c(85, 
    77.5, 72.5, 72.5, 86.6666666666667, 100, 78.3333333333333, 
    55, 78.3333333333333, 71.6666666666667, 60, 70)), row.names = c(NA, 
-12L), class = c("tbl_df", "tbl", "data.frame"))

view(media_diaria

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

Viewdput(soma_mensal)
structure(list(ano = c(2002, 2002, 2002, 2002, 2002, 2002, 2002, 
2002, 2003, 2003, 2003, 2003, 2003, 2003, 2003, 2004, 2004, 2004, 
2004, 2004, 2004, 2004, 2004, 2004), mes = c(2, 4, 5, 6, 7, 9, 

view(soma_mensal)

View11, 12, 1, 2, 3, 7, 8, 10, 12, 1, 2, 4, 5, 6, 7, 8, 9, 10), x1 = c(22, 
44, 48, 42, 6, 4, 24, 26, 52, 44, 58, 48, 10, 28, 30, 16, 58, 
14, 56, 78, 40, 34, 90, 58), x4 = c(55, 110, 120, 105, 15, 10, 
60, 65, 130, 110, 145, 120, 25, 70, 75, 40, 145, 35, 140, 195, 
100, 85, 225, 145)), row.names = c(NA, -24L), groups = structure(list(
    ano = c(2002, 2003, 2004), .rows = structure(list(1:8, 9:15, 
        16:24), ptype = integer(0), class = c("vctrs_list_of", 
    "vctrs_vctr", "list"))), row.names = c(NA, -3L), class = c("tbl_df", 
"tbl", "data.frame"), .drop = TRUE), class = c("grouped_df", 
"tbl_df", "tbl", "data.frame"))

dput(media_mensal)
structure(list(mes = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12), 
    x1 = c(34, 41.3333333333333, 58, 29, 52, 60, 31.3333333333333, 
    22, 47, 43, 24, 28), x4 = c(85, 103.333333333333, 145, 72.5, 
    130, 150, 78.3333333333333, 55, 117.5, 107.5, 60, 70)), row.names = c(NA, 
-12L), class = c("tbl_df", "tbl", "data.frame"))

view(media_mensal)

media_diaria <- df %>%
  group_by(mes) %>%
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

View(media_diaria)

view(media_diaria

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

View(soma_mensal) 

view(soma_mensal)

View(media_mensal)

view(media_mensal)

media_diaria <- df %>%
  group_by(mes) %>%
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

dput(media_diaria)
structure(list(mes = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12), 
    x1 = c(34, 31, 29, 29, 34.6666666666667, 40, 31.3333333333333, 
    22, 31.3333333333333, 28.6666666666667, 24, 28), x4 = c(85, 
    77.5, 72.5, 72.5, 86.6666666666667, 100, 78.3333333333333, 
    55, 78.3333333333333, 71.6666666666667, 60, 70)), row.names = c(NA, 
-12L), class = c("tbl_df", "tbl", "data.frame"))

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

dput(soma_mensal)
structure(list(ano = c(2002, 2002, 2002, 2002, 2002, 2002, 2002, 
2002, 2003, 2003, 2003, 2003, 2003, 2003, 2003, 2004, 2004, 2004, 
2004, 2004, 2004, 2004, 2004, 2004), mes = c(2, 4, 5, 6, 7, 9, 
11, 12, 1, 2, 3, 7, 8, 10, 12, 1, 2, 4, 5, 6, 7, 8, 9, 10), x1 = c(22, 
44, 48, 42, 6, 4, 24, 26, 52, 44, 58, 48, 10, 28, 30, 16, 58, 
14, 56, 78, 40, 34, 90, 58), x4 = c(55, 110, 120, 105, 15, 10, 
60, 65, 130, 110, 145, 120, 25, 70, 75, 40, 145, 35, 140, 195, 
100, 85, 225, 145)), row.names = c(NA, -24L), groups = structure(list(
    ano = c(2002, 2003, 2004), .rows = structure(list(1:8, 9:15, 
        16:24), ptype = integer(0), class = c("vctrs_list_of", 
    "vctrs_vctr", "list"))), row.names = c(NA, -3L), class = c("tbl_df", 
"tbl", "data.frame"), .drop = TRUE), class = c("grouped_df", 
"tbl_df", "tbl", "data.frame"))

dput(media_mensal)
structure(list(mes = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12), 
    x1 = c(34, 41.3333333333333, 58, 29, 52, 60, 31.3333333333333, 
    22, 47, 43, 24, 28), x4 = c(85, 103.333333333333, 145, 72.5, 
    130, 150, 78.3333333333333, 55, 117.5, 107.5, 60, 70)), row.names = c(NA, 
-12L), class = c("tbl_df", "tbl", "data.frame"))
adicionou 260 caracteres ao conteúdo
Fonte Link
Bruna
  • 227
  • 1
  • 9

view(media_diaria

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

View(soma_mensal) 

view(soma_mensal)

View(media_mensal)

view(media_mensal)

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

View(media_mensal)

view(media_diaria

Calculo das medias mensais (referente a soma mensal) de x1 e x4

soma_mensal <- df %>% 
  group_by(ano,mes) %>%
  summarise_at(vars(x1,x4), sum, na.rm = TRUE)
media_mensal <- soma_mensal %>% 
  group_by(mes) %>% 
  summarise_at(vars(x1,x4), mean, na.rm = TRUE)

View(soma_mensal) 

view(soma_mensal)

View(media_mensal)

view(media_mensal)

adicionou 6 caracteres ao conteúdo; tags editadas
Fonte Link
Marcus Nunes
  • 19mil
  • 9
  • 32
  • 59

"df"df é o data frame com os dados que irei trabalhar

"resumo"resumo é o data frame onde quero que minhas análises sejam registradas de forma a exportar em .csv ao final

Quando eu utilizo o pacote dplyr ele me retorna valores com as colunas nomeadas iguais as colunas do data frame "df"df visto que a seleção é realizada pelas colunas de "df"df. A grande questão é que gostaria que os resultados obtidos abaixo fossem registrados no data frame "resumo"resumo com as colunas nomeadas de acordo com o que defini acima .

Resumindo minhas duas dúvidas:

1-Como consigo realizar as 2 análises acima em relação à divisão de x3/x4 com o dplry? Caso utilizar o dplry não seja uma boa opção, qual seria uma solução possível utilizando funções? Estou tentando evitar trabalhar com loops.

2-Como faço para alimentar o dataframe "resumo" com os resultados das análises acima?

  1. Como consigo realizar as 2 análises acima em relação à divisão de x3/x4 com o dplyr? Caso utilizar o dplyr não seja uma boa opção, qual seria uma solução possível utilizando funções? Estou tentando evitar trabalhar com loops.

  2. Como faço para alimentar o dataframe resumo com os resultados das análises acima?

"df" é o data frame com os dados que irei trabalhar

"resumo" é o data frame onde quero que minhas análises sejam registradas de forma a exportar em .csv ao final

Quando eu utilizo o pacote dplyr ele me retorna valores com as colunas nomeadas iguais as colunas do data frame "df" visto que a seleção é realizada pelas colunas de "df". A grande questão é que gostaria que os resultados obtidos abaixo fossem registrados no data frame "resumo" com as colunas nomeadas de acordo com o que defini acima .

Resumindo minhas duas dúvidas:

1-Como consigo realizar as 2 análises acima em relação à divisão de x3/x4 com o dplry? Caso utilizar o dplry não seja uma boa opção, qual seria uma solução possível utilizando funções? Estou tentando evitar trabalhar com loops.

2-Como faço para alimentar o dataframe "resumo" com os resultados das análises acima?

df é o data frame com os dados que irei trabalhar

resumo é o data frame onde quero que minhas análises sejam registradas de forma a exportar em .csv ao final

Quando eu utilizo o pacote dplyr ele me retorna valores com as colunas nomeadas iguais as colunas do data frame df visto que a seleção é realizada pelas colunas de df. A grande questão é que gostaria que os resultados obtidos abaixo fossem registrados no data frame resumo com as colunas nomeadas de acordo com o que defini acima .

Resumindo minhas duas dúvidas:

  1. Como consigo realizar as 2 análises acima em relação à divisão de x3/x4 com o dplyr? Caso utilizar o dplyr não seja uma boa opção, qual seria uma solução possível utilizando funções? Estou tentando evitar trabalhar com loops.

  2. Como faço para alimentar o dataframe resumo com os resultados das análises acima?

Fonte Link
Bruna
  • 227
  • 1
  • 9
Carregando