Resultados da pesquisa a pedido "r"
linha que não consolida duplicatas em R ao usar vários meses no Filtro de Data
Estou usando o código a seguir para resumir meus dados por uma coluna library(data.table, warn.conflicts = FALSE) library(lubridate, warn.conflicts = FALSE) ################ ## PARAMETERS ## ################ # Set path of major source folder for ...
Como atribuir resultado de integrar em R a uma variável numérica?
R exemplo: k=6 f<-function(s){s^(k-1)*exp(-s)} integrate(f,0,Inf)A saída de integrar é a sequência: 120 with absolute error < 7.3e-05Eu quero atribuir o primeiro valor na string (120, a integral) a uma variável. Como fazer isso?
Trabalho incorreto do pacote de faixas na R.NET
Eu tenho o mesmo problema ao tentar usar o R.NET com o pacote de trilha (ele precisa rastrear variáveis, que foram modificadas via código R). Então, é o código R nativo, que funciona bem: library(track); track.start(clobber = "vars", dir = ...
Autenticação em aplicativo brilhante e várias páginas
No sistema que estou desenvolvendo, tenho 3 atores diferentes (usuário, administrador, equipe de suporte) usando o Shiny App. Quero saber como posso dar autenticação a esses três atores que cada um deles acessa apenas a sua página. Eu descobri ...
ignorar NA na soma de linhas dplyr
existe uma maneira elegante de lidar com NA como 0 (na.rm = TRUE) no dplyr? data <- data.frame(a=c(1,2,3,4), b=c(4,NA,5,6), c=c(7,8,9,NA)) data %>% mutate(sum = a + b + c) a b c sum 1 4 7 12 2 NA 8 NA 3 5 9 17 4 6 NA NA but I like to get a b c ...
entender a mensagem de erro ddply
Estou tentando descobrir por que estou recebendo uma mensagem de erro ao usar o ddply. Dados de exemplo: data<-data.frame(area=rep(c("VA","OC","ES"),each=4), sex=rep(c("Male","Female"),each=2,times=3), ...
Adicionando rótulos aos dados com ddply durante o subconjunto
Digamos que eu tenho um data.frame como: x <- c(1:10,1:10,1:10,1:10,1:10,1:10,1:10,1:10,1:10,1:10) df <- data.frame(x=x,y=rnorm(100))e quero rotular valores que são classificados (decrescente) no percentil 80 para cada valor de x (1:10). Posso ...
passando uma função anônima como argumento
Por que o seguinte funciona: foo <- function(x) {x} curve(foo) # plots the identity function between 0 and 1E isso não: curve(function(x) {x})Erro na curva (função (x) {: 'expr' não foi avaliada para um objeto de comprimento 'n' E ainda # the ...
Eixo X síncrono para vários anos de vendas com ggplot
Tenho 1417 dias de dados de venda de 01/01/2012 até o presente (20/11/2015). Não consigo descobrir como ter um eixo de um ano (1 de janeiro a 31 de dezembro) e as vendas de cada ano na mesma janela de um ano, mesmo ao usar o ggplotcolor ...
forçar um objeto de plotagem regular em um Grob para uso em grid.arrange
b <- ggplot(cars,aes(x=speed,y=dist))+geom_line() grid.arrange( b, plot(cars), ncol=1 )me dá o seguinte erro Erro na gList (lista (grobs = lista (lista (x = 0,5, y = 0,5, largura = 1, altura = 1,: apenas 'grobs' são permitidos em "gList" Vamos ...