計算[R]中每行的大寫字母數

Question

我在R中工作，並且在每行中有一列有各種大寫和小寫字母。我正在計算每行中大寫字母的數量並創建一個顯示該數字的列。我的專欄看起來像這樣（只是在整個數據集多了很多行）：

gctaggggggatggttactactGtgctatggactac

gGaagggacggttactaCgTtatggactac

gcGaggggattggcttac

有一種簡單的方法來創建一個列出列每行中大寫字母的數量。謝謝。

Answer 1

這應該工作：

t = c("gctaggggggatggttactactGtgctatggactac", "gGaagggacggttactaCgTtatggactac", "gcGaggggattggcttac") 
sapply(regmatches(t, gregexpr("[A-Z]", t, perl=TRUE)), length) 

Answer 2

使用plyr和stringr

ldply(str_match_all(t,"[A-Z]"),length)