[R-br] Digest R-br, volume 104, assunto 3
Edmar Caldas
edmar_caldas em yahoo.com.br
Ter Ago 20 12:07:05 -03 2019
Edmar
Em terça-feira, 20 de agosto de 2019 12:00:28 BRT, r-br-request em listas.c3sl.ufpr.br <r-br-request em listas.c3sl.ufpr.br> escreveu:
Enviar submissões para a lista de discussão R-br para
r-br em listas.c3sl.ufpr.br
Para se cadastrar ou descadastrar via WWW, visite o endereço
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
ou, via email, envie uma mensagem com a palavra 'help' no assunto ou
corpo da mensagem para
r-br-request em listas.c3sl.ufpr.br
Você poderá entrar em contato com a pessoa que gerencia a lista pelo
endereço
r-br-owner em listas.c3sl.ufpr.br
Quando responder, por favor edite sua linha Assunto assim ela será
mais específica que "Re: Contents of R-br digest..."
Tópicos de Hoje:
1. Package Tibble (Edmar Caldas)
2. Re: Package Tibble (Fernando Souza)
----------------------------------------------------------------------
Message: 1
Date: Mon, 19 Aug 2019 22:51:50 +0000 (UTC)
From: Edmar Caldas <edmar_caldas em yahoo.com.br>
To: R-br Lista <r-br em listas.c3sl.ufpr.br>
Subject: [R-br] Package Tibble
Message-ID: <2090336582.86957.1566255110255 em mail.yahoo.com>
Content-Type: text/plain; charset="utf-8"
Boa noite!
estou com um erro no código abaixo e não consigo descobrir o motivo. Já executei esse mesmo código em outra maquina.
versao do R
version.string R version 3.6.1 (2019-07-05)
library(readxl)Salario <- read_excel("F:/FIAP/R/Excel/Salario.xlsx")View(Salario)
attach(Salario)install.packages("dplyr")library(dplyr)agregar <-summarise(group_by(Salario, id), salario_m = mean(salario_m), data_pagamento_min=min(data_pagamento), data_pagamento_max=max(data_pagamento), contagem =n())agregar
View(agregar)
install.packages("rfm")install.packages("lubridate")library(rfm)library(lubridate)
data_atual <- lubridate::as_date("2019-04-05", tz = "UTC-3")agregar$data_atual <-data_atualattach(agregar)
data_compra <-lubridate::as_date(data_pagamento_max, tz="UTC")agregar$data_compra<-data_compra
attach(agregar)View(agregar)
rfm_result <- rfm_table_order(agregar, id, data_compra, salario_m, data_atual)rfm_result
install.packages("tibble")library(tibble)
rfm<-as.tibble(rfm_result)rfm
erro
Error: Tibble columns must have consistent lengths, only values of length one are recycled:* Length 0: Requested with `.rows` argument* Length 50: Column `rfm`Call `rlang::last_error()` to see a backtraceIn addition: Warning message:`as.tibble()` is deprecated, use `as_tibble()` (but mind the new semantics).This warning is displayed once per session.
Edmar
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190819/3d08833e/attachment-0001.html>
------------------------------
Message: 2
Date: Mon, 19 Aug 2019 21:37:29 -0300
From: Fernando Souza <nandodesouza em gmail.com>
To:
"=?utf-8?Q?a_lista_Brasileira_oficial_de_discuss=C3=83=C2=A3o_do_programa_R.?="
<r-br em listas.c3sl.ufpr.br>
Cc: Edmar Caldas <edmar_caldas em yahoo.com.br>
Subject: Re: [R-br] Package Tibble
Message-ID: <982FECB8-90E4-41AC-9120-62372264667C em getmailspring.com>
Content-Type: text/plain; charset="utf-8"
Seu exemplo não é reproduzível,, uma vez que não é possível acessar os dados.
Att
On Aug 19 2019, at 7:51 pm, Edmar Caldas por (R-br) <r-br em listas.c3sl.ufpr.br> wrote:
> Boa noite!
>
> estou com um erro no código abaixo e não consigo descobrir o motivo.
> Já executei esse mesmo código em outra maquina.
>
> versao do R
>
> version.string R version 3.6.1 (2019-07-05)
>
>
> library(readxl)
> Salario <- read_excel("F:/FIAP/R/Excel/Salario.xlsx")
> View(Salario)
>
> attach(Salario)
> install.packages("dplyr")
> library(dplyr)
> agregar <-summarise(group_by(Salario, id),
> salario_m = mean(salario_m),
> data_pagamento_min=min(data_pagamento),
> data_pagamento_max=max(data_pagamento),
> contagem =n())
> agregar
>
> View(agregar)
>
>
> install.packages("rfm")
> install.packages("lubridate")
> library(rfm)
> library(lubridate)
>
> data_atual <- lubridate::as_date("2019-04-05", tz = "UTC-3")
> agregar$data_atual <-data_atual
> attach(agregar)
>
> data_compra <-lubridate::as_date(data_pagamento_max, tz="UTC")
> agregar$data_compra<-data_compra
>
> attach(agregar)
> View(agregar)
>
> rfm_result <- rfm_table_order(agregar, id, data_compra, salario_m, data_atual)
> rfm_result
>
> install.packages("tibble")
> library(tibble)
>
> rfm<-as.tibble(rfm_result)
> rfm
>
>
>
> erro
>
> Error: Tibble columns must have consistent lengths, only values of length one are recycled:
> * Length 0: Requested with `.rows` argument
> * Length 50: Column `rfm`
> Call `rlang::last_error()` to see a backtrace
> In addition: Warning message:
> `as.tibble()` is deprecated, use `as_tibble()` (but mind the new semantics).
> This warning is displayed once per session.
>
>
>
> Edmar
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190819/c2981dae/attachment-0001.html>
------------------------------
Subject: Legenda do Digest
_______________________________________________
R-br mailing list
R-br em listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
------------------------------
Fim da Digest R-br, volume 104, assunto 3
*****************************************
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190820/caddb154/attachment.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: Salario.xlsx
Tipo: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet
Tamanho: 10935 bytes
Descrição: não disponível
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190820/caddb154/attachment.xlsx>
Mais detalhes sobre a lista de discussão R-br