apply

    0熱度

    2回答

    幾個月前,我正在進行篩選並找到可以執行以下操作的函數: 從腳本A開始,它可以執行腳本B n次。因此,它將創建一個包含n個元素的列表,每個列表元素將僅包含腳本B的最後一個請求對象。例如,如果腳本B的最後一行包含由某些數據的平均值組成的向量,則列表將只包含該向量。 我似乎無法再找到這個功能。 以下是我需要做的: 我的腳本B包含對模擬數據執行的模擬和計算。結果,腳本打印了一個矩陣。我想重新執行這個腳本n

    0熱度

    1回答

    : dendrapply(dendro, function(n) utils::str(attributes(n))) 其中dendro是'dendrogram' with 2 branches and 5902 members total, at height 2。 一個,而它的運行也與此錯誤崩潰後: Error: C stack usage 7971524 is too close to

    1熱度

    2回答

    我有一個函數,我正在計算經緯度座標(在SpatialPoints)和另一個座標矢量(也在SpatialPoints)之間的最小距離的指數, 。我用找到分鐘DIST的功能是: library(rgeos) dfdist$mindist <-apply(gDistance(sp1, sp2, byid=TRUE), 1, which.min) 功能上面給我一個柱mindist在我的預先存在的數據

    2熱度

    1回答

    當通過lambda調用熊貓apply()函數時,規則/過程是什麼?下面的例子。沒有lambda顯然,整個系列(df [列名])被傳遞給「測試」函數,該函數拋出一個錯誤,試圖對系列進行布爾運算。 如果通過lambda調用相同的函數,它將起作用。迭代每行都傳遞爲「x」,df [列名]返回當前行中該列的單個值。 這就像lambda正在移除一個維度。任何人都有解釋或指向這個具體的文檔?謝謝。 實施例1用的

    1熱度

    1回答

    我有一個數據幀(以下簡化版本) b<-data.frame('v1'=1:2,'v2'=3:4,'v3'=5:6) 如果我使用適用於行: test<-apply(b,1,function(x) {if (x[length(x)]>0) return (x/x[length(x)]) else return (0)}) 我: [,1] [,2] v1 0.2 0.3333333 v2

    0熱度

    1回答

    我想有條件地使用嵌套的ifelse()語句替換一個數據框中的值與另一個數據框中的值。但是我在使用apply將它擴展到整個數據框時遇到了問題。如果可能的話,我想避免循環和非基本包。 第一個是六個obs的數據框。 10個字符變量: > snp_test L1 L2 L3 L4 L5 L6 L7 L8 L9 L10 1 1 2 - 0 2 0 0 0 0 2 2 1 0 - 0 - 1 0

    0熱度

    1回答

    我有一個帶有多索引的Pandas數據框。等級0是'應變',等級1是'JGI庫'。每個「Strain」都有幾個與之關聯的「JGI庫」列。我想使用lambda函數來應用t檢驗來比較兩個不同的菌株。爲了排除故障,我使用.iloc [0]命令佔用了一行數據幀。 row = pvalDf.iloc[0] parent = 'LL1004' child = 'LL345' ttest_ind(row.g

    0熱度

    1回答

    假設您有一組函數。每個函數都會返回一個具有相同索引和大小的pandas.Series對象。每個功能採用相同的輸入,主數據幀爲df。 我正在尋找有每個系列的數據幀產生的一列輸出 目前,我有以下幾點: df_result = [f(df) for f in f_arr] df_result = pd.DataFrame(df_result) 這需要很長的時間(似乎有在列表操作上會有一些開銷),結

    0熱度

    2回答

    我有一個數據框,其中包含一羣人的文本描述。除此之外,我還有4個描述a,b,c,d。對於每個人的文字描述,我希望通過使用餘弦相似性將它們與4個描述中的每一個進行比較,並將這些得分存儲在4個新列中的相同數據框中:a,b,c,d。 我該如何以熊貓的方式做到這一點,而不使用for循環?我正在考慮使用apply函數,但我不知道如何引用'text'列以及apply函數中的4個描述a,b,c,d。 非常感謝您的

    1熱度

    1回答

    如何獲取多個數據集的頻率表msleep,msleep_sub共用列vore?我想知道是否可以通過將列名傳遞給apply家庭功能來實現。 library(msleep) head(msleep) msleep_sub <- msleep %>% group_by(genus) %>% filter(n() ==1) table(msleep$vore) # carni herbi insec