apply

    2熱度

    2回答

    我有這樣 df <- matrix(c(rep(1,3),rep(2,3)),nrow=3,ncol=2) df: [,1] [,2] [1,] 1 2 [2,] 1 2 [3,] 1 2 我想每一個單元格的值轉換爲YES,如果大於0矩陣,否則NO 我明白,我能做到這一點使用 apply(df, 2, function(x) ifelse(x > 0, "Yes","No

    1熱度

    1回答

    // Replace the method named m of the object o with a version that logs // messages before and after invoking the original method. function trace(o, m) { // Remember original method in the clos

    1熱度

    1回答

    我的數據下 A<-c(1999,1999, 2001, 2001) B<-c("A", "D", "A", "D") df<-data.frame (A, B) 我申請 df$C<-apply(df[1], 2, function(x) ifelse(x > 2000, 2000, x)) 來創建基於基準列 輸出與價值觀的新列 A B C 1 1999 A 1999 2 1999

    0熱度

    2回答

    如何找到單詞列表的出現次數?我可以搜索一個詞如下: dplyr::filter(data, grepl("apple", data$content,ignore.case = TRUE)) length(x$content) 的|分離讓我來總結所有事件。但是我想單獨計算每個單詞。 詞語可以作爲在一個csv行供給或寫入中的R本身的載體,例如: words <- c("apple","orang

    3熱度

    1回答

    我有兩個數據框:data和rules。 >>>data >>>rules vendor rule 0 googel 0 google 1 google 1 dell 2 googly 2 macbook 我試圖計算每個供應商和規則之間的相似萊文斯坦後,兩個新列添加到data數據幀。所以,我的數據框應該非常包含看起來像

    1熱度

    2回答

    我有這樣一個列表的列表: all_lists = [list0, list1, list2, list3, ....., listn] 而且像這樣採用兩個參數,從這個all_lists的功能。 def function(list0, list1): do stuff 該函數將繼續從該all_lists通過移動索引1直到它到達listn參數。 有沒有一種有效的方法來做到這一點? 謝

    1熱度

    1回答

    我有一個高維數組,並希望對它們應用一些函數。問題是我不能告訴apply()(或類似的應用系列),傳遞函數的對象不在函數的第一個參數中。 阿呆這裏例如: data <- c(1,2,3,4,5) myarray <- array(data,dim=c(5,5,2,2),dimnames=list(NULL, paste("col",1:5,sep=""), paste("matrix",1:2

    0熱度

    3回答

    目前我正在寫一個librarySystem 而且有一個字符串數組[「打招呼」,「名」],如下面的代碼示例依賴關係,但是我需要使用這個stringArray作爲通過使用apply()傳入 greetingToName()的函數數組,是否有任何方法將stringArray轉換爲函數數組? function greet(){ return 'hi!'; } function name()

    1熱度

    1回答

    我有一個df有幾列:'小時','天','星期','月','年'和'價值'。我已經「周」和「時間」與「價值」尋找均值()進行分組: df_group = df.groupby(['week','hour']).value.mean().reset_index() 現在我想申請的是平均值爲每星期每一個小時的單獨列。有任何想法嗎? 提前謝絕!

    0熱度

    1回答

    我有一個DF: id text 1 This is a good sentence 2 This is a sentence with a number: 2015 3 This is a third sentence 我有一個文本清洗功能: def clean(text): lettersOnly = re.sub('[^a-zA-Z]',' ', text)