2007-07-24から1日間の記事一覧

Rでグラフ理論

R

igraphというライブラリーがあるそうです。 Igraph available.packages() install.packages("igraph") require("igraph") 色々使ってみよう。 追記 たまに検索エンジンから来る方がいるようなので。 実装例 → エロと風俗情報満載 どう抜く?

ユークリッドの互除法

R

なんとなく。 gcd <- function(m, n){ l <- sort(c(m, n)) if(l[1] == 0) return(l[1]) while((ll <- l[2]%%l[1]) != 0){ l <- c(ll, l[1]) } return(l[1]) } gcd(2147483647, 10) [1] 1

循環小数 その2

R

さて。2^31-1は素数らしいので、当然10とも互いに素でしょう。とすると、10^e≡1 (mod 2147483647)となる最小のeが循環節の長さになるわけですが・・・。 for(i in 1:100){ print(paste(i, ":", (10**i)%%2147483647), sep="") } [1] "1 : 10" [1] "2 : 100" …

メタなR関数色々

R

Rはよく分からないデータ型やよく分からない関数がたくさんある。複雑。今思いつく範囲でまとめておく。 付加要素系 attributes class comment names 概要系 str summary args dput