2018-05-01から1ヶ月間の記事一覧

my circos

要素を円周上に並べ、関連のある要素を円の内側に弧を描くデータ視覚化手法がある。circos きれいだけれど、簡易に描きたい 特に、データ構造のみの情報で描きたい このようなデータ構造は色々考えられるが、自分の用途は次のようなもの 木グラフがある。木…

my circos

部分集合要素のソート

# ある集合に順序があり # その部分集合を全体集合に定まった順序でソートしたい my.sort.subset <- function(subset,setorder){ loc <- rep(0,length(subset)) for(i in 1:length(loc)){ loc[i] <- which(setorder==subset[i]) } ord <- order(loc) return(…

重複なし行のみの抽出

R

データレコードが行列状になっているときに、重複行を見つけて、ダブっている分を除いて、1行分にして出すのがunique() 今、ダブっているレコードは1行残らず、破棄したい unique()関数は、上からスキャンして、初出はTRUE、既出分とダブったらFALSEを返す…