しょっちゅうググってるやつを自分用にまとめる。
文字列の連結
参考に従い、+
演算子を書き換える
やや裏技っぽい方法だけど便利。
"+" <- function(e1, e2) {
if (is.character(c(e1, e2))) {
paste(e1, e2, sep = "")
} else {
base::"+"(e1, e2)
}
}
最初のカラムをindexにして削除
rownames(df) <- df[,1]
df <- df[,-1]
sumを取る
df_sum <- apply(df,2,sum)
これだけだと戻り値がvectorなため、必要に応じ以下のようにdataframeに変換。
df_sum <- data.frame(apply(df,2,sum))
colnames(df_sum) <- c("sum")
df_sum <- t(df_sum)
rowの名前で削除
names <- c('rowA','rowB')
df <- df[!(row.names(df) %in% names), ]
rowの名前で取り出し
names <- c('rowA','rowB')
df <- df[names, ]
空のDataFrame作成
df <- data.frame(
abundance=double(),
taxon=character(),
sampleID=character(),
depth=character(),
station_id=character(),
stringsAsFactors=FALSE
)
left_join
dplyr::left_join(df1 ,df2, by = "key")
0埋め
str_pad(1:100, 3, pad=0)