tapply

    12熱度

    3回答

    我想分組總結個別列,我的第一個想法是使用tapply。 但是,我無法獲得tapply的工作。 tapply可以用來求和多列嗎? 如果不是,爲什麼不呢? 我已經在互聯網上進行了大量的搜索,發現很多類似的問題早在2008年就發佈了 。但是,這些問題都沒有直接回答。相反,答案總是建議使用不同的功能。 下面是一個示例數據集,我希望按狀態將蘋果,櫻桃按狀態 和李子按狀態相加。在此之下,我已編譯tapply

    1熱度

    3回答

    我跑這樣的: GroupSummary <- function(x){ for (i in x) { if(i>0){ p <-c(summary(x)) r <- c(p) } else {if(i<0){ n <-c(summary(x)) r <- c(n) } else {stop}

    2熱度

    2回答

    我正在使用for循環來替換使用mycons矢量的myarray元素的子集。每列中的子集將從mydates直到結束。有沒有其他的for循環? mydates <- as.Date(c('2013-06-05','2013-06-16','2013-06-22')) mycons <- c(0.5,1/7,0.25) dates <- seq(as.Date('2013-06-01'),Sys.D

    1熱度

    2回答

    在R中,我有一個包含大約50個附加人口統計特徵的記錄的數據集(我稱之爲star) var1,var2,var3等)。我已通過使用下面的命令拆分在〜10%組數據集: star$cut=cut2(star$var1, g=10) 然後我用 tapply(star$RESPCODE, star$cut, mean) 來計算每個十組的響應率。 我只是試圖運行一個循環或執行這兩個命令的函數,以便我不

    8熱度

    2回答

    ,我有以下數據: a <- c(1,1,1,1,2,2,2,2) b <- c(2,4,6,8,2,3,4,1) c <- factor(c("A","B","A","B","A","B","A","B")) df <- data.frame( sp=a, length=b, method=c) 我可以用下面的方法來獲取每一個物種的樣本數的計數: n <- w

    1熱度

    2回答

    我正試圖計算每人獨特水果的平均數量(我通常的練習數據)。這與這兩行代碼很好地工作: with(df, tapply(fruit, names, FUN = function(x) length(unique(x))))->uniques sum(uniques)/length(unique(df$names)) aggregate(df[,"fruit"], by=list(id=names

    1熱度

    1回答

    我想獲得一個表格,其中包含其他因素變量的變量的前10個絕對和相對頻率。 我有一個3列的數據框:1列是一個因子變量,2是其他變量我需要計數,3是邏輯變量作爲約束。 (真正的數據庫擁有超過4mln觀察) dtf<-data.frame(c("a","a","b","c","b"),c("aaa","bbb","aaa","aaa","bbb"),c(TRUE,FALSE,TRUE,TRUE,TRUE)

    0熱度

    1回答

    我想用R從軟件包reldist中取出gini()函數來計算幾個圖的基尼係數。 我有一個數據框,我需要使用兩列作爲gini函數的輸入。 > head(merged[,c(1,17,29)]) idp c13 w 1 19 126 14.14 2 19 146 14.14 3 19 76 39.29 4 19 74 39.29 5 19 86 39.29 6 19 93 39.

    1熱度

    1回答

    我對R和統計數據非常陌生,並且無法使tapply()正常工作。我有一個有15列和數千行的數據框。我用y1<-((x>0)&(x<=5))等類似的東西做了一堆邏輯向量,其中x是數據幀中的列名。然後將這些邏輯向量組合並使用因子()將其轉換爲分組因子。一切看起來都可以正常工作。 問題是,當我嘗試使用tapply()與tapply(dataframe, group, sample, size=20)其中g

    13熱度

    4回答

    是否有可能在單個tapply或聚合語句中包含兩個函數? 下面我使用兩個tapply語句和兩個彙總語句:一個用於平均值和一個用於標清。 我寧願合併報表。 my.Data = read.table(text = " animal age sex weight 1 adult female 100 2 young male 75 3 adult mal