Programlama r

3

R: değiştirilmeden VE ardışık aynı değerler olmadan nasıl numune alınır

Çok basit bir şey gibi görünen şeyleri başarmak için bir gün geçirdim. 1,2,3 ve 4 sayılarının tam olarak 12 kez göründüğü 300 'rastgele' dizi oluşturmak zorundayım, ancak aynı sayı asla 'arka arkaya' iki kez kullanılmadı. En iyi girişimlerim (sanırım): R örneği olmadan 48 örnek var, rle ile ardışık değerler olup …

10 r sample

3

Data.table içinde yapabileceğim dtplyr ile ne yapamam?

Öğrenme çabamı, özellikle ve arasında dplyr, R'de veri tarama için yatırmalı mıyım ?dtplyrdata.table Kullandığım dplyrçoğunlukla, ancak veri ı kullanacağı için çok büyük olduğunda data.table, nadir bir olay olduğu. Şimdi dtplyrv1.0 bir arayüz olarak data.tableçıktı, yüzeyde bir daha asla data.tablearayüzü kullanma konusunda endişelenmem gerekiyor gibi görünüyor . Yani en yararlı özellikleri …

10 r dplyr data.table dtplyr

2

Neden aynı vektöre yapılan iki referans vektörün her bir elemanı için farklı bellek adresleri döndürür?

R öğreniyorum ve şu anda bu kitabı okuyorum . Kavramı anladığımdan emin olmak için, benim için oldukça kafa karıştırıcı olduğu ortaya çıkan aşağıdaki testi çalıştırdım ve açıklığa kavuşturabileceğinizi takdir ediyorum. İşte doğrudan terminalden R kabuğunda koştuğum test (RStudio veya Emacs ESS kullanmadan). > library(lobstr) > > x <- c(1500,2400,8800) > …

9 r

1

Lm formülündeki bırakma değişkeni hala kontrast hatasını tetikler

Verilerimin yalnızca bir alt kümesinde lm () çalıştırmaya çalışıyorum ve bir sorunla karşılaşıyorum. dt = data.table(y = rnorm(100), x1 = rnorm(100), x2 = rnorm(100), x3 = as.factor(c(rep('men',50), rep('women',50)))) # sample data lm( y ~ ., dt) # Use all x: Works lm( y ~ ., dt[x3 == 'men']) # Use …

9 r formula lm factors

2

Dosya boyutunu otomatik olarak büyütmeden dosyaları paralel olarak nasıl kaydedebilirim?

Ben aynı şeyi yapan 2 script var. Ancak bir komut dosyası 82,7 KB ağırlığında 3 RData dosyası ve diğer komut dosyası 120 KB ağırlığında 3 RData dosyası oluşturur. ilki paralel olmayan: library("plyr") ddply(.data = iris, .variables = "Species", ##.parallel=TRUE,##Without parallel .fun = function(SpeciesData){ #Create Simple Model ------------------------------------------------------------- Model <- lm(formula …

9 r plyr

1

R'deki GIS haritaları için Otomatik Etiket Yerleşimi

Şekil dosyalarında sfokumak için paketi (ve ilgili paketleri) ggplot2ve çizim için (ve arkadaşları) kullanarak R'de GIS haritaları yapıyorum . Bu iyi çalışıyor, ancak nehirler ve yollar gibi özellikler için (otomatik / programlı) etiket yerleşimleri oluşturmanın bir yolunu bulamıyorum. Bu özellikler tipik olarak düzensiz şekillere sahip linestringlerdir. Örneğin wikimedia'dan eklenen resme …

9 r gis spatial sf ggrepel

2

Birkaç kod parçasını kısa bir şekilde görüntüleme

Ben blogdownhangi R kodu ve Stata kodu karşılaştırmak ile bir blog oluşturuyorum . Kullanıcı R ve Stata nasıl yapıldığını karşılaştırabilirsiniz böylece her iki kodu göstermek istiyorum. Ancak, iki veya daha fazla parçayı arka arkaya koymak (R kodu, Stata + çıkış kodu) okumayı oldukça rahatsız eder. Birkaç mizanpajı dahil etmek için …

9 r blogdown

5

Son (veya yalnızca) karakter sıfır değilse, R'deki önde gelen sıfırları kaldırmak için normal ifade

gsub("(?<![0-9])0+", "", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" gsub("(^|[^0-9])0+", "\\1", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" Yukarıdaki normal ifade , R'deki bir dizeden tüm önde gelen sıfırların nasıl kaldırılacağını açıklayan bu SO iş parçacığından gelir . …

9 r regex string gsub stringr

1

Aylık verileri günlük veri frekansına ayırmak için tempdisagg paketindeki `td` komutunu nasıl kullanabilirim?

Günlük sıklık verilerine ayırmaya çalıştığım aylık sıklık verilerim var. Bu yüzden aşağıdaki kodu kullanarak R paketinden tdkomutu kullanın tempdisagg: dat=ts(data[,2]) result=td(dat~1, conversion = "average", to = "day", method = "chow-lin-maxlog") Sonra aşağıdaki hata iletisini alıyorum: Error in td(dat ~ 1, conversion = "average", to = "day", method = "chow-lin-maxlog") : …

9 r statistics time-series syntax-error frequency

1

İşaretçiyi bir Rcpp işlevinden "yeni" bir nesneye döndürmenin uygun yolu

1) potansiyel olarak büyük bir bellek baskısı olan özel bir sınıf ve 2) bazı ön işlem gerçekleştiren, daha sonra özel sınıfımızın yeni bir nesnesini oluşturan ve döndüren üst düzey bir işlev düşünün. Değere göre gereksiz kopyalamayı önlemek için işlev, nesneyi ayırır ve onun yerine bir işaretçi döndürür. Önceki bir tartışmaya …

9 c++ r rcpp

1

RcppArmadillo'nun örneği (), R güncelleştirildikten sonra belirsiz

Ben genellikle her satır 1 toplam K olasılıkları içeren bir matris girdi olarak alır kısa bir Rcpp fonksiyonu ile çalışır. Fonksiyon daha sonra rastgele her satır için sağlanan olasılıklara karşılık gelen 1 ve K arasında bir tamsayı örnekler. Bu işlev: // [[Rcpp::depends(RcppArmadillo)]] #include <RcppArmadilloExtensions/sample.h> using namespace Rcpp; // [[Rcpp::export]] IntegerVector …

9 r rcpp rcpparmadillo

6

Yinelenen karakterleri eşleştirme ve kaldırma: Birden fazla (3+) ardışık olmayan örneği değiştirin

regexHer karakterin üçüncü, dördüncü, oluşumu ile eşleşecek bir model arıyorum . Açıklama için aşağıya bakın: Örneğin ben aşağıdaki dize var: 111aabbccxccybbzaa1 İkinci olaydan sonra tüm yinelenen karakterleri değiştirmek istiyorum. Çıktı şöyle olacaktır: 11-aabbccx--y--z--- Şimdiye kadar denediğim bazı regex kalıpları: Aşağıdaki normal ifadeyi kullanarak her karakterin son tekrarlamasını bulabilirim: (.)(?=.*\1) Ya …

9 python r regex string

4

Listedeki listelerin eşdeğer olup olmadığını kontrol etmenin daha hızlı bir yolu var mı?

Burada 1:7dört farklı bölüm için tamsayılarım var , yani {1}, {2,3,4}, {5,6} ve {7} ve bu bölümler bir listede yazılıyor, yani list(1,c(2,3,4),c(5,6),7). Bölümleri kümeler olarak ele alıyorum, böylece bir bölüm içindeki öğelerin farklı permütasyonları aynı bölüm olarak tanınmalıdır. Örneğin list(1,c(2,3,4),c(5,6),7)ve list(7,1,c(2,3,4),c(6,5))eşdeğerdir. Unutmayın, listedeki elemanlar için tekrar yoktur , örneğin, hayır …

9 r algorithm list performance

1

Kalkışa daha hızlı alternatif ()

Tekrarlanan çağrılara dayanan bir paket tutuyorum deparse(control = c("keepNA", "keepInteger")). controlher zaman aynıdır ve ifade değişir. deparse()aynı seçenek grubunu tekrar tekrar yorumlamak için çok zaman harcıyor gibi görünüyor .deparseOpts(). microbenchmark::microbenchmark( a = deparse(identity, control = c("keepNA", "keepInteger")), b = .deparseOpts(c("keepNA", "keepInteger")) ) # Unit: microseconds # expr min lq mean …

9 r

5

Önceki n satırı temel alarak koşullu olarak yeni bir sütun oluşturma

Aşağıdaki gibi ayarlanmış bir veri çerçevesi var: df <- data.frame("id" = c(111,111,111,222,222,222,222,333,333,333,333), "Location" = c("A","B","A","A","C","B","A","B","A","A","A"), "Encounter" = c(1,2,3,1,2,3,4,1,2,3,4)) id Location Encounter 1 111 A 1 2 111 B 2 3 111 A 3 4 222 A 1 5 222 C 2 6 222 B 3 7 222 A 4 8 …

9 r dataframe dplyr duplicates

«r» etiketlenmiş sorular