Articles of r

Como atribuir um número de identificação exclusivo a cada grupo de valores idênticos em uma coluna

Eu tenho um quadro de dados com um número de colunas. Eu gostaria de criar uma nova coluna chamada “id” que fornece um número de identificação exclusivo para cada grupo de valores idênticos na coluna “sample”. Exemplo de dados: # dput(df) df <- structure(list(index = 1:30, val = c(14L, 22L, 1L, 25L, 3L, 34L, 35L, […]

Instalação offline do pacote R e dependencies

Suponha que eu precise instalar vários pacotes em uma máquina (Linux) que não tenha uma conexão com a Internet. Digamos que eu baixei uma cópia do cran e queimei em um DVD que levo para o local off-line: wget ftp://cran.r-project.org/pub/R/src/contrib/*.tar.gz Eu posso até adicionar um arquivo PACKAGES que contém uma visão geral de todos os […]

Como cbind ou rbind diferentes vetores de comprimentos sem repetir os elementos dos vetores mais curtos?

cbind(1:2, 1:10) [,1] [,2] [1,] 1 1 [2,] 2 2 [3,] 1 3 [4,] 2 4 [5,] 1 5 [6,] 2 6 [7,] 1 7 [8,] 2 8 [9,] 1 9 [10,] 2 10 Eu quero uma saída como abaixo [,1] [,2] [1,] 1 1 [2,] 2 2 [3,] 3 [4,] 4 [5,] 5 [6,] […]

Como posso contar as corridas em sequência?

Em R, qual seria a maneira mais eficiente / simples de contar execuções de elementos idênticos em uma sequência? Por exemplo, como contar os números de zeros consecutivos em uma sequência de inteiros não negativos: x <- c(1,0,0,0,1,0,0,0,0,0,2,0,0) # should give 3,5,2

pacote dplyr pode ser usado para mutação condicional?

O mutate pode ser usado quando a mutação é condicional (dependendo dos valores de certos valores de coluna)? Este exemplo ajuda a mostrar o que quero dizer. structure(list(a = c(1, 3, 4, 6, 3, 2, 5, 1), b = c(1, 3, 4, 2, 6, 7, 2, 6), c = c(6, 3, 6, 5, 3, 6, […]

Arredondar de 0,5

Sim, eu sei porque nós sempre arredondamos para o número par mais próximo se estamos no meio exato (ou seja, 2,5 se torna 2) de dois números. Mas quando quero avaliar dados para algumas pessoas, eles não querem esse comportamento. Qual é o método mais simples para obter isso: x <- seq(0.5,9.5,by=1) round(x) ser 1,2,3, […]

Combinação única de todos os elementos de dois (ou mais) vetores

Eu estou tentando criar uma combinação única de todos os elementos de dois vetores de tamanho diferente em R. Por exemplo, o primeiro vetor é > a <- c("ABC", "DEF", "GHI") e o segundo é datas armazenadas como seqüências de caracteres atualmente > b <- c("2012-05-01", "2012-05-02", "2012-05-03", "2012-05-04", "2012-05-05") Eu preciso criar um quadro […]

Gere vários charts a partir de uma function R

Eu gostaria de gerar várias janelas gráficas de dentro de uma function em R usando charts ggplot … testf <- function(a, b) { devAskNewPage(TRUE) qplot(a, b); # grid.newpage(recording = TRUE) dev.new() qplot(a, a+a); # grid.newpage(recording = TRUE) dev.new() qplot(b, b+b); } library(ggplot2) x <- rnorm(50) y <- rnorm(50) testf(x, y) No entanto, nem dev.new () […]

Adicionar século correto às datas com ano fornecido como “Ano sem século”,% y

Eu tenho um arquivo com aniversários no formato %d%b%y . Alguns por exemplo. # “01DEC71” “01AUG54” “01APR81” “01MAY81” “01SEP83” “01FEB59” Eu tentei reformatar a data como o108$fmtbirth <- format(as.Date(o108$birth, "%d%b%y"), "%Y/%m/%d") e este é o resultado # “1971/12/01” “2054/08/01” “1981/04/01” “1981/05/01” “1983/09/01” “2059/02/01” Estes são aniversários e eu vejo 2054. Desta página eu vejo que […]

Posicionamento inteligente de label de ponto em R

1) Existe alguma biblioteca / function R que implementaria a colocação de etiquetas INTELLIGENT na plotagem R? Eu tentei alguns, mas eles são todos problemáticos – muitos labels estão se sobrepondo uns aos outros ou outros pontos (ou outros objects no enredo, mas eu vejo que isso é muito mais difícil de lidar). 2) Se […]