15/08/31 22:49:57.01 bRmq7rAJ.net
>>566
n <- length(a)
m <- 5
idx <- outer(1:n, 1:m, function(x, y) {
i <- x + y - 1
ifelse(i > n, NA, i)
})
matrix(a[as.vector(idx)], n, m)
596:１３２人目の素数さん
15/08/31 23:03:08.47 a6KkcCW8.net
>>566
matrix(1:105, nrow=106, ncol=5)[1:100,]
597:１３２人目の素数さん
15/09/01 03:44:48.39 APnc79JV.net
>>568
この時系列行列に変換する作業を数百回近く計算させるので少しでも速い方が良いわけです
1000も5も暫定の数です
やはりcbindではなくrbindですよね
forの回数を減らしたいがためにちょっとインチキかなと思ったんですが、
563さんのコードが正確に意味を捉えた書き方で、
自分のやり方だと行列計算したときに結果が違ってきそうです
>>569
おお、dplyrを使った方法とは・・・
末端部分に多少の欠損値があっても大丈夫です
do.call関数でググったら、
なにやらcbind_allというものを使うとめっちゃ速くなるらしいので少し調べてみたいと思います
b.dfにapplyを適用させるのではなく、
apply(b.df,1,・・・と同等の処理をdplyrで実現できないか？ということです
実はforからapplyに書き換えたら処理速度が遅くなったという経緯がありまして・・・
多分書き換える過程で余計な処理が入ったためと思われますが、
dplyrで処理したら或いはという思惑と、
これが実現できたらこれから大分dplyrに依存=夢広がるという期待があります
598:１３２人目の素数さん
15/09/01 03:45:19.40 APnc79JV.net
>>570,567
うおお・・・for文使ってない！
凄いのですが基本を右往左往してる自分には理解するのに暫くかかりそうです
特に+0:99など何がどうなっているのか
あと条件後出しで申し訳ないんですが実際計算するときのaは等間隔で増加するベクトルではなく、
任意の数列を使うのでサンプルでとなるとa<-floor(runif(1000, min=-10, max=10+1))みたいなのを想定しています
matrix関数を使って出来るのでしょうか
>>571
今のところ最速で処理できています
aを任意のベクトルにしても実用的な速さで十分な速度が得られています
まだコードを理解しきれていないですが、これでかなりいけそうです
あとはこれをdplyrで行列計算できれば・・・
599:１３２人目の素数さん
15/09/01 06:35:19.43 APnc79JV.net
>>571
と思ったらこちらも任意のベクトルを適用できませんでした・・・orz
しかしトリッキーな発想で面白い
ん～・・・試行錯誤してみます
ちなみに自前のデータで処理時間を計測
[要素数1,000]
for+cbind
ユーザ システム 経過
0.07 0.00 0.07
dplyr(>>569)
ユーザ システム 経過
0 0 0
[要素数100,000]
for+cbind
ユーザ システム 経過
6.78 0.53 7.42
dplyr
ユーザ システム 経過
0.41 0.03 0.43
[要素数1,000,000]
for+cbind
ユーザ システム 経過
61.94 8.00 70.55
dplyr
ユーザ システム 経過
4.23 0.78 5.02
という結果でした
600:１３２人目の素数さん
15/09/01 11:44:57.85 K/HKBkbA.net
>>566
任意のベクトルを使い、n行m列の場合。意外なことに、行列を使った方が遅かった。
n <- 100000; m <- 1000; x <- floor(runif(n, min=-10, max=10+1)); library(dplyr)
system.time(suppressWarnings(matrix(c(x,rep(NA,m)),
601:nrow=n+m+1,ncol=m)[1:n,])) system.time({y<-list(x);for(i in 2:m) y[[i]]<-lead(y[[i-1]]);do.call(cbind,y)})
602:１３２人目の素数さん
15/09/01 14:54:45.72 sVtr2BWr.net
Rのkernlabパッケージのksvmについて質問です。
クラス分類の方法は、1対他分類法でしょうか？それとも、1対1分類法でしょうか？
603:１３２人目の素数さん
15/09/01 21:52:40.64 APnc79JV.net
>>576
numericで領域確保してからやると1割くらいは速くなりましたが、
やはりc++で書かれてるdplyrが大分上手のようです
applyライクな処理をdplyrでの件ですが、
引き渡すベクトルが順不同であればsummarizeでもイケるんじゃね、
ということで見様見真似で書いたのが、
result <- data.frame(b,group=1:length(b[,1]))%>%group_by(group)%>%summarize(sum(x[x>=0])+sum(x[x<0]))
で、遅っい上に結果も散々でした
どこが悪いんでしょうか
604:566
15/09/01 22:17:22.56 SSGZ4Gcs.net
>>576
a が任意のベクトルで動作するはずだが。
うまくいかないなら、例を示してくれ。
605:566
15/09/01 22:41:48.49 SSGZ4Gcs.net
>>575
a が任意のベクトルで動作するはずだが。
うまくいかないなら、例を示してくれ。
606:１３２人目の素数さん
15/09/02 02:57:51.71 4iW/oU28.net
>>579
どうやら色々やってるうちにaに生成した(1:1000)ベクトルが入った状態でテストしたようで、
勝手に先の流れで序順を利用したコードだと思い込んでいました
大変に失礼しました
ちなみに処理時間を計測
[要素数1,000]
ユーザ システム 経過
0 0 0
[要素数100,000]
ユーザ システム 経過
0 0 0
[要素数1,000,000]
ユーザ システム 経過
0 0 0
( д) ﾟ ﾟ
これが神か・・・
コードの理解に暫く時間がかりますが、
これは何としても使えるようになりたいです
607:１３２人目の素数さん
15/09/02 12:39:45.57 4iW/oU28.net
なるほど先に要素行列を作ってベクトルに変換して必要な要素を一気に取り出して行列に変換しているのか
1期ずらす処理を1度に処理する為にouter使っているのがミソというわけで
見るほどに感心するコードだ
608:１３２人目の素数さん
15/09/03 00:14:38.52 5YiJ7XJ/.net
今はdplyrだけに頼らず、
他の関数見つけたりプログラムの構造変えたりで何とかやってみます
みなさんどうもありがとうございました！
609:１３２人目の素数さん
15/09/09 20:32:02.94 QQfGZEIe.net
Programming R in Haskell
URLﾘﾝｸ(tweag.github.io)
610:１３２人目の素数さん
15/09/09 21:15:19.06 TrnTzRuR.net
プログラミング言語っていくつ覚えればいいのか不安になる（と思ったのが10年以上昔のこと）。
C/C++、Perl 4とshだけでもこりごりという感じだったのに。
611:１３２人目の素数さん
15/09/17 23:09:34.21 IcXN+AYD.net
重回帰分析についての質問です。
普通の線形回帰で、残差をリサンプリングするブートストラップはlm.boot関数でできます。
そして、ロバスト回帰はlmrob関数でできます。
ロバスト回帰の標準誤差を「残差をリサンプリングする」ブートストラップで
求めるにはどうしたらいいでしょうか？
FRBパッケージのFRBmultiregMM関数だと、説明変数をリサンプリングするタイプしかできません。
よろしくお願いします。
612:１３２人目の素数さん
15/09/19 23:05:08.64 SzjUH7wj.net
581さんと被っちゃいますが、重回帰分析について質問です
調べたのですがどうにも重相関係数Rの出し方が分からなくて。どなたかお教え頂けないでしょうか？
613:１３２人目の素数さん
15/10/07 21:26:24.84 SCBAaPXh.net
普通の多層パーセプトロン(MLP)なら {neuralnet} や {RSNNS}、
リカレントボルツマンマシン(RBM)なら {RSNNS} や {deepnet}、
Deep Belief Network (DBN)なら {deepnet} など。
よく読みこめてませんが、広
614:くディープラーニングは {h2o}。 畳み込みニューラルネット(DNN)、ディープボルツマンマシン(DBM)を 実装しているパッケージが見つかりません。 知っている方いらっしゃったら教えていただけませんか？
615:１３２人目の素数さん
15/11/25 11:47:23.80 w1ZE2Z96.net
昨日からターミナルで使い始めた初心者です。
?saveでsaveのヘルプを表示させました。
スペースを押して、ヘルプの最後まで表示させると
(END)という表示が出ています。
このヘルプを終了させて、?saveでヘルプを表示させる
までの続きの作業をしたいのですが、どうやって
ヘルプを終了させてもとのRの作業に戻れるのでしょうか？
616:１３２人目の素数さん
15/11/25 12:29:22.87 wET37QtA.net
>>589
操作はページャの種類に依存します。
自分でoptions("pager")を設定した記憶がないのであれば、
lessやmanなどと同じ操作系だと思います。
qを押下して終了です。
617:１３２人目の素数さん
15/11/25 17:52:35.61 w1ZE2Z96.net
>>590
ありがとうございます。教えていただいたやり方でヘルプを抜けることが
できました。
618:１３２人目の素数さん
15/11/28 17:28:15.50 YHjirQEi.net
RとRsdudioインストールしました。入門書教えてください。
619:１３２人目の素数さん
15/11/28 17:36:37.55 hMPkNogr.net
man R
620:１３２人目の素数さん
15/11/28 18:20:49.99 /G6hJ4fc.net
できました
print("hello")
621:１３２人目の素数さん
15/11/30 12:14:45.58 zZxdQ0Zc.net
>>592
help.start()
に「An Introduction to R」があるはず。
これが入門書
622:１３２人目の素数さん
15/11/30 16:28:03.44 mrGrCOoh.net
>>593
>>595
ありがとう、でも初心者には難しい
はじめての「Ｒ」、とか見付けたので色々あさってみる
623:１３２人目の素数さん
15/12/09 11:22:45.05 /M/35Cmk.net
Rのコンソール設定を変更して、背景色を変えたり、テキストのカラーを
変更してsaveやapplyしても、もう一回、Rコンソールに入り直すと、
デフォルトの白色の背景色と赤色の>コマンドになってしまうのは、なぜなのでしょうか。
ちなみに、windowsユーザで、Rstudioは使用していません。
macユーザだと、その辺りが簡単になっている感じがする。
624:１３２人目の素数さん
15/12/09 11:30:29.13 /M/35Cmk.net
あと、R3.2.2だと、直交表を作成するconjointライブラリーやepicalcライブラリー
が入らないのですが、R3.2.2で、それらと同様のことが出来るライブラリーは
ありませんか。
Rの2系を入れて試しても、バージョンが少しでも違うと入らないようです。
なるべく、R3.2.2だけを利用していきたいので、なんかいい方法ないかな、と。
625:１３２人目の素数さん
15/12/09 17:19:57.20 eAv93o6+.net
嘘はよくないぞ
> R.Version()$version.string
[1]
626:１３２人目の素数さん
15/12/09 17:21:57.88 eAv93o6+.net
あれ、途中で切れた？
R version 3.2.2でもepicalcはインストールできるよ
> R.Version()$version.string
[1] "R version 3.2.2 (2015-08-14)"
> packageVersion("epicalc")
[1] ‘2.15.1.0’
627:１３２人目の素数さん
15/12/10 13:23:04.42 0xWTEjIU.net
>>600
今、それと同じように実行してみたところ、以下の結果になった。
> R.Version()$version.string
[1] "R version 3.2.2 (2015-08-14)"
> packageVersion("epicalc")
packageVersion("epicalc") でエラー:
パッケージ ‘epicalc’ が見付かりません
と表示されたので、パッケージをインストールしてみた。
> install.packages('epicalc')
Installing package into ‘C:/Users/ユーザー名/Documents/R/win-library/3.2’
(as ‘lib’ is unspecified)
--- このセッションで使うために、CRAN
628:のミラーサイトを選んでください --- 警告メッセージ: package ‘epicalc’ is not available (for R version 3.2.2) と表示されて、やはり、入らなかったよ。
629:１３２人目の素数さん
15/12/10 13:30:31.94 1yOwJ443.net
>>601
epicalcはアーカイブに入っているから、そんな方法じゃ入らないよ。
CRANからソース(*.tar.gz)をダウンロードして、ソースから入れないと。
コンパイルできる環境が構築していないなら、まずはそこからだな。
Mac OS XやLinuxでは何てことはない平常運転でも、
Windowsユーザはいろいろと苦労しなくてはいけないことがあるが、まぁ頑張れ。
630:１３２人目の素数さん
15/12/10 14:17:12.25 0xWTEjIU.net
>>602 ありがとうございます。やはり、Rはコンソール設定など含めて、
Macの方がいろいろと楽みたいですね。
あと、今、自分が使っている、最近、出版されたRのテキストに、
IQR()関数は、四分位偏差と書いてあるのだけど、
これって、四分位範囲のことと間違えているんじゃない。
四分位範囲は、(第3四分位数)－(第1四分位数)のことで、それを2で
割ったものが、四分位偏差だと思うのだけど。
でも、それをRで実行してみると、おかしな結果になる
> a <- c(1,2,3,4,5,6)
> median(a)
[1] 3.5 中央値は、これで正解になっている
> IQR(a)
[1] 2.5
と出るのだけど、四分位範囲であれば、ここでの第3四分位数である
5と、第1四分位数である2を引いた数である3が正解になっているはず
なのに、なぜか、2.5がIQR()関数での結果となってしまう。
この理由が分かる人、誰かいませんか。
631:１３２人目の素数さん
15/12/10 14:21:30.25 /qElYksh.net
ソース見なされ
632:１３２人目の素数さん
15/12/10 15:13:40.19 0xWTEjIU.net
>>604 関数の()を付けないで入力すると、函数のソースを出せるんですね。
さっそく、やってみました。
> IQR
と、入力してIQR()関数がどうなっているかを調べてみると、
function (x, na.rm = FALSE, type = 7)
diff(quantile(as.numeric(x), c(0.25, 0.75), na.rm = na.rm, names = FALSE,
type =
633:type)) <bytecode: 0x2c0ca970> <environment: namespace:stats> この関数のコードは、よく分からないのだけど、たぶん、ベクトルcの中で、 0.75の位置にあるもの(第3四分位数)と0.25の位置にあるもの(第1四分位数)を 差分(diff)した解を求める関数とある。やはり、IQR()は、四分位範囲(quantile)を 求める関数で、四分位偏差を求めると記述してあったRの本は、記述ミスだったらしい。 でも、 a <- c(1,2,3,4,5,6)で、自分で計算するやると、やはり、3が答えになるのだけど、 Rだと、 > IQR(a) [1] 2.5 と表示されるので、やはり、自分にとっては謎設定であるIQR()関数
634:１３２人目の素数さん
15/12/10 16:30:41.89 1yOwJ443.net
>>602
誰の本？
635:１３２人目の素数さん
15/12/10 16:30:43.29 /qElYksh.net
>>605
aをquantile()に入れてみそ
ヘルプ見ると分かるけど四分位値の計算方法って9通りあるから
スマフォなんで、ぶっきらぼうでスマンが
636:１３２人目の素数さん
15/12/10 16:32:36.22 1yOwJ443.net
>>604
そのあたりの話はヘルプに詳しく書いてあった気がするけど。
>>606 の指摘通り、複数のやり方があるので要注意。
637:１３２人目の素数さん
15/12/10 17:08:12.50 /qElYksh.net
もう一つ、aをfivenum()に入れてみそ
638:１３２人目の素数さん
15/12/10 22:09:25.43 0xWTEjIU.net
>>606
共著者3人で書かれたものです。題名と著者名があえて挙げないけど、
出版社はオーム社で、今年、出版されたもの。これだけで、結構、
該当著書が絞り込めるはず
>>607
面白い方法を教えてくれて、ありがとうございます。
さっそく、言われた通り実行してみると、
a <- c(1,2,3,4,5,6)
quantile(a)
0% 25% 50% 75% 100%
1.00 2.25 3.50 4.75 6.00
と実行結果が得られる。このRの四分位数の計算だと、第3四分位数が75%の下に
書いている4.75になって、第1四分位数が25%の下にある2.25になって、
その四分位範囲は、(第3四分位数の4.75)－(第1四分位数の2.25)の演算で
2.5が答えという風になっているようだけど、学校で習う一般的なレベルでの
要素が偶数個ある場合の四分位範囲の求め方は、
a <- c(1,2,3,4,5,6) だと、左半分(この場合は、1,2,3)の中央値である2が
第1四分位数となって、右半分(この場合は、4,5,6)の中央値である
5が第3四分位数になるので、a <- c(1,2,3,4,5,6) のベクトルでは
(第3四分位数の5)－(第1四分位数の2)＝(四分位範囲の3)
が、一般的な四分位範囲の答えのはずなのです。
639:１３２人目の素数さん
15/12/10 22:09:52.51 0xWTEjIU.net
>>608 ヘルプに書いてあるんですね。今、コンソールのヘルプにある
関数で、quantileを入力すると、
URLﾘﾝｸ(127.0.0.1:27220)
に、その演算の仕様が書いてあって、英語なので、まだ、よく読んでいない
のだけど、教えてくれたように、9タイプくらいの方法 quantile algorithms が
あるみたいです。そして、記述によると、どうもベクトル内の要素を連続量(値)とみなすか、
離散量(値)とみなすかで計算方法が違うらしくて、それで私の計算結果との誤差が生じている
感じですね。RのIQR()関数は、どうやら連続量を前提にして、計算しているらしいです。
quantile(a)
0% 25% 50% 75% 100%
1.00 2.25 3.50 4.75 6.00 で、分かりました。
640:１３２人目の素数さん
15/12/10 22:10:14.21 0xWTEjIU.net
>>609
やってみました。
> fivenum(a)
[1] 1.0 2.0 3.5 5.0 6.0
そう、この区切り方が5数要約として一般的なもの。この並びだと
真ん中の3.5が、このベクトルの中央値で、一番左の1.0が最小値、
一番右が最大値6.0、
(第3四分位数の5.0)－(第1四分位数の2.0) ＝ (四分位範囲の3)
でいいはずなのに、Rで実行すると、IQR(a) は2.5になってしまう。
上記に書いたように、Rは四分位範囲を離散値でなく、実数の連続量
とみなして計算しているらしいので、いろんな計算の仕方があるんだ、
という風に理解しておきます。みなさんのアドバイス、すごい役立ちました。
感謝です。
641:ID:/qElYksh
15/12/10 23:09:46.44 cDoHP26z.net
既にご自身で結論を出されていましたね。Rで計算結果に疑問を感じたら
ヘルプを見て、ソースを見てみて下さいな。
642:１３２人目の素数さん
15/12/12 17:09:26.81 kkbLZYaG.net
The R Tips 初心者にはお勧め
643:１３２人目の素数さん
15/12/22 21:39:05.11 9PXApgtJ.net
URLﾘﾝｸ(blog.rstudio.org)
644:１３２人目の素数さん
15/12/25 06:56:52.21 aM2CFtVE.net
ggplot2のパッケージが、いろんな設定(rstan、JAGS言語など)を
グチャグチャ昨日、適当にいじっていたら、使えなくなってしまった。
インストールは普通に出来るのだけど、library(ggplot2)で実行すると、
> library(ggplot2)
Error in loadNamespace(j <- i[[1L]], c(lib.loc, .libPaths()), versionCheck = vI[[j]]) :
‘Rcpp’ という名前のパッケージはありません
エラー: ‘ggplot2’ に対するパッケージもしくは名前空間のロードが失敗しました
となってしまう。Rでggplot2が使えないのは、かなり致命傷になる。それでqplot()なども
使えなくなってしまう。R自体をアンインストール、再インストール・再起動しても同じ状態。
ファイルやフォルダ関係、あとは、アクセス権限がない、みたいなエラーが出たので、
その辺りも、いろいろ弄ってしまったので、調べても訳が分かりません。
barplot()の棒グラフやhist()ヒストグラム、箱ひげ図などは、普通に、表示できるっぽい。
qplot()関係がダメ。だから、それを使った散布図などが出来なくなりました。
windowsユーザーです。Rstudioは使っていない。
こ�
645:黷ｪ分かる、サンタさんはどこかにいますか？
646:１３２人目の素数さん
15/12/25 07:00:27.25 aM2CFtVE.net
library()で見てみると、
ggplot2 An Implementation of the Grammar of Graphics
という風に、ちゃんと入っている状態なのだけど……
647:１３２人目の素数さん
15/12/25 07:52:52.50 aM2CFtVE.net
library(dplyr) でも、
Error in loadNamespace(j <- i[[1L]], c(lib.loc, .libPaths()), versionCheck = vI[[j]]) :
‘Rcpp’ という名前のパッケージはありません
エラー: ‘dplyr’ に対するパッケージもしくは名前空間のロードが失敗しました
と出てしまう。
648:１３２人目の素数さん
15/12/25 09:34:56.89 N3WdRUCJ.net
頭悪すぎるだろエラーちゃんと読めよ
Rcppが無いって言ってんだからお前がすべきなのはRの再インストールでもggplot2の再インストールでもない
Rcpp消して入れ直してみるのが先だろゴミゆとり野郎
649:１３２人目の素数さん
15/12/25 12:23:57.37 iEwQQMjm.net
サンタさんでなくエスパーさんに聞いて下さい
650:１３２人目の素数さん
15/12/25 13:33:16.76 aM2CFtVE.net
>>619
言われた通り、Rcppのフォルダを削除して、もう一度、インストールしたら、
即、直りました。サンタさま、ありがとうございました。
おかげで、所要時間20秒で済んだ。年末、これが憂鬱の種にならなくてよかった.
>>620 いや、サンタさまで、十分間に合いました。こんな簡単な処理で、
すぐに直るものなのですね。>>すべては、614さんのおかげ。謝謝
651:１３２人目の素数さん
16/01/06 23:07:21.72 cU3+F9ld.net
このスレの人は普段どういう環境で仕事や研究してるの？マシンスペック教えてください。
rstudioは使ってますか？
652:１３２人目の素数さん
16/01/07 07:34:53.00 X61d4/mV.net
>>622
RStudioは初心者の教育用に使うだけ。自分の仕事には使わない。
ESS一択。計算量が多い時には、ローカルなマシンで計算せずに、
sshでワークステーションに仕事を投げる。
OSはDebianだったりUbuntuだったり。
653:１３２人目の素数さん
16/01/08 21:05:28.78 JPD190uC.net
iPadで動かしたい。。
654:１３２人目の素数さん
16/01/08 21:09:29.35 PqBfVTkg.net
GGRKS
655:１３２人目の素数さん
16/01/12 12:24:19.15 TWZN5dtNB
iPad用にコンパイルされたRをAppleStoreからインストールすれば良いだけでは？
656:１３２人目の素数さん
16/01/17 00:42:59.69 9b3bxHlo.net
俺もiPad Air持ってて、アプリでR使いたいな
入れておけば(使うことはないだろうけど)精神衛生上なんとなく落ち着くｗ
657:１３２人目の素数さん
16/01/30 01:26:15.08 EpxjstHo.net
y1=5sin(2x)-(x-1)^2-x+1
y2=5xのとき、これらのグラフをx軸について回転したとき
2つのグラフによって囲まれた部分の図形が作り出す体積を求めるプログラムを知りたいです
わかる方よろしくお願いします
少し面倒かと思われますので、指針だけでもよろしくお願いします。
658:１３２人目の素数さん
16/01/30 03:20:40.97 B02VPa1I.net
テスト
659:１３２人目の素数さん
16/01/30 21:47:27.52 +SVdgNRU.net
>>628です
どなたかご協力いただけないでしょうか？
原点付近の、回転体のとき重なる部分が単にy1-y2の絶対値を取るだけでは答えにならない点で困っています
また、式的にはy1-y2=0は解けないので、正確な答えはでないと思います
言い忘れていましたが、xの定義域は-3~3で、統合を含め、xは0．05刻みです
660:１３２人目の素数さん
16/01/30 22:40:17.48 sI/08laF.net
>>630
x軸の周りに回転させるんでしょ。
maximaで
> integrate(%pi*(abs(5*sin(2*x)-(x-1)^2-x+1-5*x))^2, x, -3, 3)
とやればいいんじゃないでしょうか。
661:１３２人目の素数さん
16/01/31 02:38:51.77 I0z1DqCP
662:.net
663:１３２人目の素数さん
16/01/31 04:22:20.52 5xdbM6c9.net
囲まれた部分を、x軸を中心に回転させるんでしょ
だったら体積は π∫(絶対値の大きい方^2－絶対値の小さい方^2)dx
具体的には、y1とy2の交点は４つ
x1=-3.4 辺り、x2=-1.2 辺り、x3=0、x4=0.9 辺り
x1～x2までは、直線の方が絶対値が大きく、
x2～x4までは曲線の方が絶対値が大きい。従って、
π∫[x1,x2](y2^2-y1^2)dx ＋ π∫[x2,x4](y1^2-y2^2)dx
=π{G(x1)+G(x4)-2G(x2)}、ただしG(x)=∫(y1^2-y2^2)dx
囲まれた部分全体ではなく、-3<x<3に限るんなら、上の式のx1を-3に変えればいい
664:１３２人目の素数さん
16/01/31 20:47:21.80 2V+6v/YT.net
すみません、ggplot2について質問なんですが、
X軸の日付が順番通りにならなくて困ってます
グラフの2012年のところだけ順番通りではありません
(10月→11月→12月→1月→2月・・・の順番になってしまっている）
データフレームはUNIXTIME、DATE、CNTで出来ていて、
以上を回避するためにorder=UNIXTIMEとしているのですが症状が変わりません
どうしたら良いでしょうか
URLﾘﾝｸ(i.imgur.com)
665:１３２人目の素数さん
16/01/31 20:48:59.80 2V+6v/YT.net
2012年というか全部12月→1月→2月・・・になっています
出来れば日付は日本語表記のままでグラフを作成したいです
666:１３２人目の素数さん
16/02/01 01:58:36.58 0KawvKnN.net
>>634
2012年01月、2012年02月…という風に、月を二桁で統一すればいい。
667:１３２人目の素数さん
16/02/01 02:05:39.03 CZb7wEI0.net
>>636
やっぱそうなりますよね・・・
でもこれなんでDATEで勝手にソートされるんですかね
668:１３２人目の素数さん
16/02/01 02:20:49.00 0KawvKnN.net
>>637
このページは見た？ 参考になるかも。
URLﾘﾝｸ(d.hatena.ne.jp)
669:１３２人目の素数さん
16/02/01 02:32:27.94 CZb7wEI0.net
>>638
私もググってて何となくreorderを使うくさいと思ってたんですが、
今一うまく解説してるところ見つけきらなくて、提示頂いたサイトむちゃくちゃ参考になりました
なるほどやはりggplot2側で自動ソートされる仕様になってたんですね
x=reorder(DATE,UNIXTIME)でうまくいきました
本当にありがとうございました
URLﾘﾝｸ(i.imgur.com)
670:１３２人目の素数さん
16/02/04 10:32:04.35 JL7iFL5z.net
質問失礼します (作業環境：Rstudio)
plot関数で、Console窓右上の演算マーク (赤丸) が消えてから実際に図に反映されるのに物によって結構ラグがあるのですが、
これってPCスペックの何が原因なのでしょうか？ (グラボ？メモリ？)
671:１３２人目の素数さん
16/02/08 20:03:50.54 LxZQ+c+P.net
失礼します。
Rのbigmemoryで大規模データを扱っているのですが、
いくつもbig.matrixを開いていたら、
メモリ周りがよく分からない状況になりました。
URLﾘﾝｸ(imgur.com)
(Ubuntu, R:3.2.3 + CRAN bigmemory)
Rで200GB (300% of 実メモリ) 使っていても、swap 0 ?
VIRTだけなら
672:分かるのですが、RESもSHRも200GBあるのに? 動いているので良いのですが、どこかで落とし穴にはまりそうで、 状況が分かる方がいらっしゃれば教えていただけませんでしょうか。 よろしくお願いいたします。
673:635
16/02/09 11:18:39.06 fzCoE2Td.net
自己解決しました。
/proc/meminfoを見てみたらほとんどがmapped(mmapでファイルを割り付けたもの)のようで、それがRES等にも加えられてるようです。実質的には3Gも使われてないっぽい。
わ、分かりづらい
674:１３２人目の素数さん
16/02/15 08:40:12.65 oRmEdyA+.net
ノーパソ買いかえるんだが、ベイズやる上でCore i7の6500Uと6700HQに体感できる差はある (or 将来的にできそう) ？
重い解析はワークステーションに投げるんで、数十分で終わる程度の奴を想定している
675:１３２人目の素数さん
16/02/15 20:28:53.09 0p6HKS2R.net
ノートでi7は要らない
デスクトップのi7と性能違いすぎて詐欺レベル
676:１３２人目の素数さん
16/02/17 03:52:46.24 feRTMT7V.net
ソフトにもよるだろうが、多数のGPU乗せたマシンのほうが高速性が期待できるのでは？
URLﾘﾝｸ(jp.msi.com)
677:１３２人目の素数さん
16/02/18 10:27:34.17 ZteT24Rk.net
>>644-645
レスあり
性能ならデスクトップ一択なのは承知しているんだが、取り回し等よりノーパソ1台で済ませたいという
GPUは意識したこと無かったわ、ありがと
678:１３２人目の素数さん
16/02/18 10:31:02.46 wYvHu03W.net
つか、RはGPU処理に対応してんのかい？
679:１３２人目の素数さん
16/02/20 08:53:25.66 zdrm6gPN.net
gputools, rpud, gmatrix, Rth あたりらしい
680:１３２人目の素数さん
16/02/20 15:26:34.88 tDm8yoBp.net
どれも性能悪い。
無理してRに固執する必要ないだろ。
681:１３２人目の素数さん
16/02/26 19:36:22.86 sIiMyP7t.net
素のままじゃできなくて、workspace増やしてfisher.testやったら止まったｗｗｗ
core i5 560mじゃそろそろ限界かね…＼(^o^)／
682:１３２人目の素数さん
16/03/08 20:42:50.89 yuH6aTM/.net
複数マシンでSOCKベースのforeachで並列処理をしてたんだけど、
doSNOWとdoParallelって動きが違うのね。
doParallelは.inorder=Fを指定しても.inorder=Tの動きをするみたい。
同期待ちでmasterのメモリが食いつぶされるからちょっとだけ困る
Parallelが標準パッケージだからdoParallelでいけるかと検討したけど、
まだしばらくはdoSNOWじゃないとダメかも。
683:１３２人目の素数さん
16/04/15 16:50:54.02 EilkwPxt.net
R-Sourceが404な気がする
684:１３２人目の素数さん
16/04/15 18:32:55.61 EilkwPxt.net
繋がった
685:１３２人目の素数さん
16/04/28 03:08:15.29 aybSk7QD.net
>>653
俺も今週の月曜にnot foundでショック受けたけど、今さっき復活したわ
何か不安定なのかね
686:１３２人目の素数さん
16/05/13 16:55:37.87 xYRRJQlp.net
wilcox.testのwが手計算と合わないので調べたらこういうことだった。
# The literature is not unanimous about the definitions of
# the Wilcoxon rank sum and Mann-Whitney tests.
# The two most common definitions correspond to the sum of the
687:ranks of # the first sample with the minimum value subtracted or not: # R subtracts and S-PLUS does not, # giving a value which is larger by m(m+1)/2 for a first sample of size m # http://stats.stackexchange.com/questions/65875/different-ways-to-calculate-the-test-statistic-for-the-wilcoxon-rank-sum-test m<-5 n<-10 x<-rnorm(m) y<-rnorm(n,1.05) W<-wilcox.test(x,y)$statistic ; W sum(rank(c(x,y))[1:m]) ; W + m*(m+1)/2 #p<-wilcox.test(x,y)$p.value ; p #pwilcox(W,a,b)*2
688:１３２人目の素数さん
16/08/13 20:59:56.75 dlJBKWkf.net
Rグラフィック自由自在を買ってみたが、酷い日本語訳だった
内容はいいのに残念
689:￥ ◆2VB8wsVUoo
16/08/13 21:01:15.20 MH0rl3z5.net
￥
>1 ：名無しさん ：2006/04/30(日) 01:41:01 ID:KPnB.CH2
> 迷惑かしらん
>
>5470 ：￥ ◆2VB8wsVUoo ：2016/08/06(土) 17:43:47 ID:???
> ￥
>
>5471 ：kmath1107★ ：2016/08/07(日) 06:25:49 ID:???
> 人への念の盗み見による介入を阻め。
>
>5472 ：￥ ◆2VB8wsVUoo ：2016/08/07(日) 08:32:51 ID:???
> ￥
>
>5473 ：kmath1107★ ：2016/08/07(日) 17:43:49 ID:???
> 人への念の盗み見による介入を阻め。
>
>5474 ：￥ ◆2VB8wsVUoo ：2016/08/07(日) 17:54:48 ID:???
> ￥
>
>5475 ：名無しさん ：2016/08/08(月) 04:30:59 ID:C9rjCaNs
> 人への念の盗み見による介入を阻むことができれば、多くの人に明るい未来が来る？
>
>5476 ：kmath1107★ ：2016/08/08(月) 10:05:45 ID:???
> 人への念の盗み見による介入を阻め。
>
> Re:>>5525 人への念の盗み見による介入が無くなれば世の不和が無くなるだろう.
>
690:￥ ◆2VB8wsVUoo
16/08/13 21:31:18.22 MH0rl3z5.net
￥
691:￥ ◆2VB8wsVUoo
16/08/13 21:31:35.77 MH0rl3z5.net
￥
692:￥ ◆2VB8wsVUoo
16/08/13 21:31:52.51 MH0rl3z5.net
￥
693:￥ ◆2VB8wsVUoo
16/08/13 21:32:08.44 MH0rl3z5.net
￥
694:￥ ◆2VB8wsVUoo
16/08/13 21:32:24.45 MH0rl3z5.net
￥
695:￥ ◆2VB8wsVUoo
16/08/13 21:32:39.90 MH0rl3z5.net
￥
696:￥ ◆2VB8wsVUoo
16/08/13 21:33:08.80 MH0rl3z5.net
￥
697:￥ ◆2VB8wsVUoo
16/08/13 21:33:25.06 MH0rl3z5.net
￥
698:￥ ◆2VB8wsVUoo
16/08/13 21:33:42.04 MH0rl3z5.net
￥
699:￥ ◆2VB8wsVUoo
16/08/13 21:34:01.71 MH0rl3z5.net
￥
700:￥ ◆2VB8wsVUoo
16/08/14 00:57:41.14 hHuX2yZq.net
￥
701:￥ ◆2VB8wsVUoo
16/08/14 04:45:43.63 hHuX2yZq.net
￥
702:￥ ◆2VB8wsVUoo
16/08/14 20:13:04.08 hHuX2yZq.net
￥
703:￥ ◆2VB8wsVUoo
16/08/15 03:14:50.36 8iYIg1PH.net
￥
704:１３２人目の素数さん
16/08/15 09:48:18.10 pgQft918.net
URLﾘﾝｸ(astamuse.com)
これ早く実用化しようぜ
705:￥ ◆2VB8wsVUoo
16/08/15 10:14:57.54 8iYIg1PH.net
￥
706:￥ ◆2VB8wsVUoo
16/08/15 10:54:41.22 8iYIg1PH.net
￥
707:￥ ◆2VB8wsVUoo
16/08/15 15:54:51.35 8iYIg1PH.net
￥
708:￥ ◆2VB8wsVUoo
16/08/15 20:59:57.96 8iYIg1PH.net
￥
709:１３２人目の素数さん
16/08/15 23:48:32.35 xJYWYtfQ.net
Big Data
大学学部に入学して
Programming with Big Data in R.読むから
710:￥ ◆2VB8wsVUoo
16/08/16 01:55:22.44 N2o8Q9O0.net
￥
>1 ：名無しさん ：2006/04/30(日) 01:41:01 ID:KPnB.CH2
> 迷惑かしらん
>
>5535 ：￥ ◆2VB8wsVUoo ：2016/08/13(土) 18:53:14 ID:???
> ￥
>
>5536 ：kmath1107★ ：2016/08/13(土) 21:08:24 ID:???
> 人への念の盗み見による介入を阻め。
>
>5537 ：￥ ◆2VB8wsVUoo ：2016/08/13(土) 21:25:44 ID:???
> ￥
>
>5538 ：kmath1107★ ：2016/08/13(土) 23:23:07 ID:???
> 人への念の盗み見による介入を阻め。
>
>5539 ：kmath1107★ ：2016/08/13(土) 23:41:45 ID:???
> 人への念の盗み見による介入を阻め。
>
>5540 ：名無しさん ：2016/08/14(日) 00:05:47 ID:???
> かつて僕（増田哲也、痴漢で逮捕）が大阪大学基礎工学部の学部学生であった時、大学院の指導教官となってくれそうな先生を
> 探して各地のいろんな先生方を訪ねて回った時の事である。理論物理学を大学院で専攻しようとして理
> 論物理学の初歩をかじっていた僕（増田哲也、痴漢で逮捕）は、当時京都大学数理解析研究所に居られた超一流の理論物理学者で
> おられる中西先生にこんな質問をした事がある。
>
> 僕（増田哲也、痴漢で逮捕） ： 「理論物理学では円周率が様々な所に出てきますが、それには何か深
711:い物理的な理由があるの > でしょうか？」 > > 中西先生： 「そういう事を何時も頭の片隅に置いておくのはとても大切な事です。でもそんな事ばかり > 考えていたら研究論文が書けなくなります。研究者とはそんな甘いものではありません。」 > > 僕（増田哲也、痴漢で逮捕） ： 「は－そうなんですか－」 > > 結局僕（増田哲也、痴漢で逮捕）は京都大学の中西先生ではなく、別の先生に大学院の指導教官になって頂き、理論物理学ではな > く純粋数学を専攻した。しかしこの時の中西先生のお言葉は今でも何となく「気になって」いる > >5541 ：名無しさん ：2016/08/14(日) 00:22:38 ID:??? > いい加減、芳雄に謝罪しろ >
712:１３２人目の素数さん
16/08/29 20:34:18.53 FNSNZBXi.net
質問します。
id date id2 class x
000 201506 s000 A 1.0
000 201506 s000 B 2.0
000 201506 s000 C 3.0
000 201507 s001 A 0.5
000 201507 s001 B 1.5
000 201507 s001 C 2.5
000 201508 s002 A 3.0
000 201508 s002 B 0.5
000 201508 s002 C 0.1
このようなデータフレームがあったときに、
id date id2 x
000 201506 s000 6.0
000 201507 s001 4.5
000 201508 s002 3.6
このようにclassという変数でxという値に足してまとめる関数などはありますでしょうか？
713:１３２人目の素数さん
16/08/29 21:05:52.91 UJLq6vde.net
classの値を条件に取り出して、sumするだけだろ？
714:￥ ◆2VB8wsVUoo
16/08/29 21:16:14.14 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
715:￥ ◆2VB8wsVUoo
16/08/29 21:18:11.28 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
716:￥ ◆2VB8wsVUoo
16/08/29 21:19:27.29 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
717:￥ ◆2VB8wsVUoo
16/08/29 21:20:37.33 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
718:￥ ◆2VB8wsVUoo
16/08/29 21:22:20.69 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
719:￥ ◆2VB8wsVUoo
16/08/29 21:24:22.09 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
720:￥ ◆2VB8wsVUoo
16/08/29 21:27:09.48 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
721:￥ ◆2VB8wsVUoo
16/08/29 21:28:37.42 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
722:１３２人目の素数さん
16/08/29 21:29:07.13 iVq+ZtqY.net
まね
723:￥ ◆2VB8wsVUoo
16/08/29 21:30:24.05 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
724:１３２人目の素数さん
16/08/29 22:29:22.16 FNSNZBXi.net
>>680
subset関数などを使うということですか？
725:￥ ◆2VB8wsVUoo
16/08/29 2
726:2:39:39.36 ID:5a8Ea2gJ.net
727:￥ ◆2VB8wsVUoo
16/08/29 22:40:57.85 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
728:￥ ◆2VB8wsVUoo
16/08/29 22:41:51.05 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
729:￥ ◆2VB8wsVUoo
16/08/29 22:50:16.84 5a8Ea2gJ.net
￥
>702 :１３２人目の素数さん 2016/08/28(日) 09:23:11.92 ID:TqV2rkX7
>荒らしじゃなくてリアル糖質やろ
>数学ってその記号の乱舞や得体のしれなさ感が思考漏出や侵入の妄想に侵されてる糖質を特にひきつけやすいんやろうな
>
>703 :１３２人目の素数さん 2016/08/28(日) 14:03:57.24 ID:HR+3VvKr
>増田とか決めつけてるやつなんなの。
>
>ただの統合失調症の患者だろ。
>ちょっと前にいた長文キチガイと同じ人物
>
>704 :１３２人目の素数さん 2016/08/28(日) 23:09:09.34 ID:zyy7a/SC
>お前の方こそマジなんなんだって感じだ。
>芳雄芳雄と騒いだりkmath1107の掲示板に粘着したりするやつは\＝猫＝Dr.Masudaしかいない。
>
>707 :１３２人目の素数さん 2016/08/29(月) 00:13:27.56 ID:a08IoyIs
>牟岐線の行楽へ行かないんですか？
>
>755 名前：１３２人目の素数さん ：2016/08/29(月) 16:30:34.20 ID:tk2e6+QZ
> 夏目漱石の遺作である明暗に小林って男がいて
> そいつは人に嫌われることに快感を見出し他人に迷惑をかけることに自分を見出す男なんだけど、猫の人生ってまさにそんな感じだな
> ごみみたいな論文しか書けなくて低学歴
>
>759 名前：１３２人目の素数さん ：2016/08/29(月) 17:22:16.26 ID:3C5ckLv/
> 増田哲也 の銅像を建て、
> 古事記に 増田哲也命（ますだてつやのみこと） の痴漢話を追加して、
> 増田哲也 の悪行を後世に永遠に語り継ごう！
>
730:￥ ◆2VB8wsVUoo
16/08/29 23:04:01.14 5a8Ea2gJ.net
￥
731:￥ ◆2VB8wsVUoo
16/08/29 23:04:19.56 5a8Ea2gJ.net
￥
732:￥ ◆2VB8wsVUoo
16/08/29 23:04:34.98 5a8Ea2gJ.net
￥
733:￥ ◆2VB8wsVUoo
16/08/29 23:05:05.91 5a8Ea2gJ.net
￥
734:￥ ◆2VB8wsVUoo
16/08/29 23:05:20.49 5a8Ea2gJ.net
￥
735:￥ ◆2VB8wsVUoo
16/08/29 23:05:38.20 5a8Ea2gJ.net
￥
736:￥ ◆2VB8wsVUoo
16/08/29 23:05:54.09 5a8Ea2gJ.net
￥
737:￥ ◆2VB8wsVUoo
16/08/29 23:06:09.02 5a8Ea2gJ.net
￥
738:￥ ◆2VB8wsVUoo
16/08/29 23:06:25.19 5a8Ea2gJ.net
￥
739:￥ ◆2VB8wsVUoo
16/08/29 23:06:40.87 5a8Ea2gJ.net
￥
740:１３２人目の素数さん
16/09/04 17:17:46.73 uNZrFEhe.net
実時間が入っているデータで、一定幅の「時間帯」をラベルにするような方法はあるでしょうか？
741:１３２人目の素数さん
16/09/04 19:55:06.67 TDOQWzXP.net
>>706
POSIXlt型に変換されているならcut関数を使えばいける。breaks=に"hour"とか区切り方を指定すればOK
742:700
16/09/08 12:54:34.16 UODsNiRV.net
>>707
ありがとうございます！
やってみます
743:１３２人目の素数さん
16/09/25 09:34:42.83 b94OmM0w.net
相関係数の標本分布の図を出力したいです。
リンクの画像みたいな奴
URLﾘﾝｸ(www.sitmo.com)
ずばり式なり、プログラミングなり教えてくれ。
744:￥ ◆2VB8wsVUoo
16/09/25 10:34:23.75 VBoukDxw.net
￥
745:￥ ◆2VB8wsVUoo
16/09/25 10:34:41.48 VBoukDxw.net
￥
746:￥ ◆2VB8wsVUoo
16/09/25 10:34:58.19 VBoukDxw.net
￥
747:￥ ◆2VB8wsVUoo
16/09/25 10:35:16.46 VBoukDxw.net
￥
748:￥ ◆2VB8wsVUoo
16/09/25 10:35:33.49 VBoukDxw.net
￥
749:￥ ◆2VB8wsVUoo
16/09/25 10:35:48.79 VBoukDxw.net
￥
750:￥ ◆2VB8wsVUoo
16/09/25 10:36:18.72 VBoukDxw.net
￥
751:￥ ◆2VB8wsVUoo
16/09/25 10:36:41.17 VBoukDxw.net
￥
752:￥ ◆2VB8wsVUoo
16/09/25 10:37:00.50 VBoukDxw.net
￥
753:￥ ◆2VB8wsVUoo
16/09/25 10:37:18.44 VBoukDxw.net
￥
754:１３２人目の素数さん
16/09/25 11:13:17.03 R70tUm2r.net
>>709
URLﾘﾝｸ(www.sitmo.com)
755:￥ ◆2VB8wsVUoo
16/09/25 11:26:10.40 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
756:１３２人目の素数さん
16/09/25 11:46:14.02 b94OmM0w.net
>>720
式ありがとうございます。
Rで相関係数の標本分布の図を描くプログラミングも知りたいのでどなたか教えてください。
757:￥ ◆2VB8wsVUoo
16/09/25 11:50:31.48 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
758:１３２人目の素数さん
16/09/25 11:53:19.14 R70tUm2r.net
>>722
library(SuppDists)
N<-10
y1<-rPearson(n=100000, N, rho=0)
y2<-rPearson(n=100000, N, rho=0.25)
y3<-rPearson(n=100000, N, rho=0.5)
plot(density(y1),xlim=c(-1.5,1.5),ylim=c(0,1.6))
lines(density(y2),col=2)
lines(density(y3),col=3)
759:１３２人目の素数さん
16/09/25 11:58:17.53 b94OmM0w.net
>>724
SuppDistsを入れて、動かしてみました。
思っていたものです。
ありがとうございます。
いろいろ数字をいじってみます。
760:￥ ◆2VB8wsVUoo
16/09/25 12:16:10.32 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
761:１３２人目の素数さん
16/09/25 12:29:48.98 b94OmM0w.net
r2norm <- function(n, mu, sigma, rho) {
tmp <- rnorm(n)
x <- mu+sigma*tmp
y <- rho*x + sqrt(1-rho^2)*rnorm(n)
return(data.frame(x=x,y=y))
}
mydata <- r2norm(100, 0, 1, 0.5)
cor(mydata$x,mydata$y)
x1 <- numeric(length=10000)
for (i in 1:10000) {mydata <- r2norm(10, 0, 1, 0)
s<- cor(mydata$x,mydata$y)
x1[i] <- s}
x2 <- numeric(length=10000)
for (i in 1:10000) {mydata <- r2norm(10, 0, 1, .25)
s2<- cor(mydata$x,mydata$y)
x2[i] <- s2}
x3 <- numeric(length=10000)
for (i in 1:10000) {mydata <- r2norm(10, 0, 1, .5)
s3<- cor(mydata$x,mydata$y)
x3[i] <- s3}
plot(density(x1),xlim=c(-1.5,1.5),ylim=c(0,1.6))
lines(density(x2),col=2)
lines(density(x3),col=3)
762:１３２人目の素数さん
16/09/25 12:31:31.25 b94OmM0w.net
>>727は、>>724に触発されて作ってみました。
複数のサイトのコピペで作っただけですが、なんだか、スッキリしました。
>>724さん、改めてありがとうございました。
763:￥ ◆2VB8wsVUoo
16/09/25 12:38:12.82 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
764:１３２人目の素数さん
16/09/25 12:39:28.00 b94OmM0w.net
図々しいのですが、加えて質問をさせてください。
ランダム生成からのplotではなく、
確率密度関数によって、きれいにplotするプログラミンも教えてもらえませんか。
765:￥ ◆2VB8wsVUoo
16/09/25 12:43:06.99 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
766:１３２人目の素数さん
16/09/25 12:57:25.55 R70tUm2r.net
>>730
x<-seq(from=-1.5,to=1.5,length.out = 1000)
d1<-dPearson(x = x,N = 10,rho = 0)
d2<-dPearson(x = x,N = 10,rho = 0.25)
d3<-dPearson(x = x,N = 10,rho = 0.5)
plot(x,d1,type="l",col=1,ylim=c(0,1.6))
lines(x,d2,col=2)
lines(x,d3,col=3)
767:￥ ◆2VB8wsVUoo
16/09/25 13:14:40.61 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
768:１３２人目の素数さん
16/09/25 13:19:00.04 b94OmM0w.net
>>732
まことに、ありがとうございました。
教えていただいたプログラミングの意味を勉強します。
769:￥ ◆2VB8wsVUoo
16/09/25 13:21:05.27 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
770:１３２人目の素数さん
16/09/25 15:32:03.95 BL+yjTYo.net
みんな頭いいんだなぁ
勉強中だけどさっぱり分からん
771:￥ ◆2VB8wsVUoo
16/09/25 16:35:30.09 VBoukDxw.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
772:￥ ◆2VB8wsVUoo
16/09/25 17:13:10.81 VBoukDxw.net
￥
773:￥ ◆2VB8wsVUoo
16/09/25 17:13:27.67 VBoukDxw.net
￥
774:￥ ◆2VB8wsVUoo
16/09/25 17:13:44.32 VBoukDxw.net
￥
775:￥ ◆2VB8wsVUoo
16/09/25 17:13:59.96 VBoukDxw.net
￥
776:￥ ◆2VB8wsVUoo
16/09/25 17:14:16.36 VBoukDxw.net
￥
777:￥ ◆2VB8wsVUoo
16/09/25 17:14:31.55 VBoukDxw.net
￥
778:￥ ◆2VB8wsVUoo
16/09/25 17:14:46.46 VBoukDxw.net
￥
779:￥ ◆2VB8wsVUoo
16/09/25 17:15:03.49 VBoukDxw.net
￥
780:￥ ◆2VB8wsVUoo
16/09/25 17:15:20.02 VBoukDxw.net
￥
781:￥ ◆2VB8wsVUoo
16/09/25 17:15:37.70 VBoukDxw.net
￥
782:￥ ◆2VB8wsVUoo
16/09/25 18:17:03.92 VBoukDxw.net
馬鹿板遊びはもうヤメレ。頭の悪い奴が跋扈したらアカンやろ。東京都庁
みたいにナルぞ。
￥
783:１３２人目の素数さん
16/10/01 14:58:06.90 uxqnkz1u.net
year month income expense diff
2016 07 50 15 35
2016 08 30 70 -40
このようなdata.frameがあります。
その月毎のincomeとexpenseをこの順に左からならべてbarplotにしたいです。
2016年7月分はincomeを(2016-07,-15)と(2016-07, 35)の間の縦棒、expenseは(2016-07, -15)と(2016-07,0)の間の縦棒。この2本はくっつけて表示させたいです。
次の2016年8月分はincome(2016-08, 0)と(2016-08, 30)の間の縦棒、expenseは(2016-08, -40)と(2016-08,30)の間の縦棒を描画したいです。この2つは7月分とは少し離して描画できないでしょうか。
よろしくお願いします。
784:￥ ◆2VB8wsVUoo
16/10/01 16:14:10.42 hX8kEwRO.net
馬鹿板遊びはもうヤメレ。頭の悪い奴が跋扈したらアカンやろ。東京都庁
みたいにナルぞ。
￥
785:￥ ◆2VB8wsVUoo
16/10/01 17:42:19.82 hX8kEwRO.net
￥
786:￥ ◆2VB8wsVUoo
16/10/01 17:42:37.77 hX8kEwRO.net
￥
787:￥ ◆2VB8wsVUoo
16/10/01 17:42:55.21 hX8kEwRO.net
￥
788:￥ ◆2VB8wsVUoo
16/10/01 17:43:11.49 hX8kEwRO.net
￥
789:￥ ◆2VB8wsVUoo
16/10/01 17:43:28.22 hX8kEwRO.net
￥
790:￥ ◆2VB8wsVUoo
16/10/01 17:43:43.75 hX8kEwRO.net
￥
791:￥ ◆2VB8wsVUoo
16/10/01 17:43:58.43 hX8kEwRO.net
￥
792:￥ ◆2VB8wsVUoo
16/10/01 17:44:13.48 hX8kEwRO.net
￥
793:￥ ◆2VB8wsVUoo
16/10/01 17:44:29.89 hX8kEwRO.net
￥
794:￥ ◆2VB8wsVUoo
16/10/01 17:44:48.85 hX8kEwRO.net
馬鹿板遊びはもうヤメレ。頭の悪い奴が跋扈したらアカンやろ。東京都庁
みたいにナルぞ。
￥
795:￥ ◆2VB8wsVUoo
16/10/02 05:35:39.87 gY266DhX.net
￥
796:￥ ◆2VB8wsVUoo
16/10/02 10:15:40.80 gY266DhX.net
￥
797:１３２人目の素数さん
16/10/02 21:17:03.85 jWdphjbd.net
>>749
とりあえず、ヒントだけ。
> d <- data.frame(i = 1:5, e = 1:5)
> barplot(t(d[, c("i", "e")]), beside = TRUE, names.arg = paste(7:11, "月"))
798:１３２人目の素数さん
16/10/04 00:03:38.42 Eu7Cy3cF.net
> 757
ヒントありがとうございます。
year<- c(2016,2016)
month<-c(07,08)
income<-c(50,30)
expense<-c(15,70)
diff<-c(35,-40)
(dtt<-data.frame(YEAR=year, MONTH=month, INCOME=income, EXPENSE=expense, DIFF=diff))
dttm<-as.matrix(dtt)
barplot(t(dttm[,c(3,4)]), beside=TRUE)
教えてもらったここまではできました。
799:￥ ◆2VB8wsVUoo
16/10/04 00:15:40.99 Z
800:aAz6bOT.net
801:￥ ◆2VB8wsVUoo
16/10/04 00:21:26.14 ZaAz6bOT.net
￥
802:￥ ◆2VB8wsVUoo
16/10/04 00:21:43.34 ZaAz6bOT.net
￥
803:￥ ◆2VB8wsVUoo
16/10/04 00:22:00.28 ZaAz6bOT.net
￥
804:￥ ◆2VB8wsVUoo
16/10/04 00:22:17.04 ZaAz6bOT.net
￥
805:￥ ◆2VB8wsVUoo
16/10/04 00:22:31.56 ZaAz6bOT.net
￥
806:￥ ◆2VB8wsVUoo
16/10/04 00:22:47.99 ZaAz6bOT.net
￥
807:￥ ◆2VB8wsVUoo
16/10/04 00:23:08.19 ZaAz6bOT.net
￥
808:￥ ◆2VB8wsVUoo
16/10/04 00:23:26.84 ZaAz6bOT.net
￥
809:￥ ◆2VB8wsVUoo
16/10/04 00:23:45.56 ZaAz6bOT.net
￥
810:￥ ◆2VB8wsVUoo
16/10/04 00:24:05.13 ZaAz6bOT.net
￥
811:１３２人目の素数さん
16/10/04 23:17:06.05 5lO37yPD.net
rect()とかでbarを描画していくしかないでしょうか。
barplotのままでbarをshiftさせていくのは難しいか。
812:￥ ◆2VB8wsVUoo
16/10/04 23:21:18.58 ZaAz6bOT.net
若い奴を相手にして、『人前ではメッキで遣り過ごせ！』と教える芳雄が、
何と「研究者としての基本的態度」を申し述べ、毎晩の様に連呼して、そ
の重要性を訴えてた。所が芳雄は一向に「何をどうスル事なのか」を説明
せず、子供の私は日々頭を悩ませた。普通に考えれば、ソレは：
★★★「研究対象に向かう時にどういう風に頭を使って考えて創造的になるか」★★★
であろう。そして試行錯誤を繰り返しながら失敗を重ね、その度毎に芳雄
に罵倒され、そして「釜ヶ崎へ行け！」と恐喝された。
でも芳雄を良く観察し、そして：
★★★『芳雄と一緒になって母親を無根拠に罵倒したら「芳雄は大喜び」した！』★★★
ので、やっと理解した。芳雄が言う「研究者としての基本的態度」とは：
１．その場の自分の損得を考える。
２．何も考えずに「芳雄に同調」スル。
３．発言の中身を空虚にして、表現にだけ注意して敬語を使う。
という様な事であり、要は『顔色を窺って、その場を繕え』という事だ。
コレを理解した時はホンマに嬉しかった。芳雄のオツムが『サル並である』
という定理を証明した瞬間だった。
￥
813:￥ ◆2VB8wsVUoo
16/10/04 23:32:08.30 ZaAz6bOT.net
￥
814:￥ ◆2VB8wsVUoo
16/10/04 23:32:24.07 ZaAz6bOT.net
￥
815:￥ ◆2VB8wsVUoo
16/10/04 23:32:40.35 ZaAz6bOT.net
￥
816:￥ ◆2VB8wsVUoo
16/10/04 23:40:51.35 ZaAz6bOT.net
￥
817:￥ ◆2VB8wsVUoo
16/10/04 23:41:06.10 ZaAz6bOT.net
￥
818:￥ ◆2VB8wsVUoo
16/10/04 23:41:21.72 ZaAz6bOT.net
￥
819:￥ ◆2VB8wsVUoo
16/10/04 23:41:38.00 ZaAz6bOT.net
￥
820:￥ ◆2VB8wsVUoo
16/10/04 23:41:53.13 ZaAz6bOT.net
￥
821:￥ ◆2VB8wsVUoo
16/10/04 23:42:11.56 ZaAz6bOT.net
￥
822:￥ ◆2VB8wsVUoo
16/10/04 23:42:28.26 ZaAz6bOT.net
￥
823:￥ ◆2VB8wsVUoo
16/10/04 23:49:23.12 ZaAz6bOT.net
￥
824:１３２人目の素数さん
16/10/05 00:56:33.07 PcC8Rgne.net
久しぶりに来たらなんだこれ
なんかRに恨みでもあんのか
825:１３２人目の素数さん
16/10/05 01:21:59.62 0MSpG4tB.net
構うな。NGワードへ登録
826:１３２人目の素数さん
16/10/08 00:01:46.18 CjOpE3tl.net
>763さん
stack overflowで質問してみました。
Jpegのグラフも載せたのでご覧いただけたら幸いです。
URLﾘﾝｸ(stackoverflow.com)
827:￥ ◆2VB8wsVUoo
16/10/08 00:04:21.68 tA6BJFvJ.net
馬鹿板遊びはもうヤメレ。頭の悪い奴が跋扈したらアカンやろ。東京都庁
みたいにナルぞ。
￥
828:￥ ◆2VB8wsVUoo
16/10/08 00:08:15.98 tA6BJFvJ.net
ワシが炎上さしたろか。
￥
829:￥ ◆2VB8wsVUoo
16/10/08 06:24:51.60 tA6BJFvJ.net
￥
830:￥ ◆2VB8wsVUoo
16/10/08 06:25:08.33 tA6BJFvJ.net
￥
831:￥ ◆2VB8wsVUoo
16/10/08 06:25:25.88 tA6BJFvJ.net
￥
832:￥ ◆2VB8wsVUoo
16/10/08 06:25:42.80 tA6BJFvJ.net
￥
833:￥ ◆2VB8wsVUoo
16/10/08 06:25:58.59 tA6BJFvJ.net
￥
834:￥ ◆2VB8wsVUoo
16/10/08 06:26:14.08 tA6BJFvJ.net
￥
835:￥ ◆2VB8wsVUoo
16/10/08 06:26:31.11 tA6BJFvJ.net
￥
836:￥ ◆2VB8wsVUoo
16/10/08 06:26:47.22 tA6BJFvJ.net
￥
837:￥ ◆2VB8wsVUoo
16/10/08 06:27:05.57 tA6BJFvJ.net
￥
838:￥ ◆2VB8wsVUoo
16/10/08 06:27:24.78 tA6BJFvJ.net
￥
839:￥ ◆2VB8wsVUoo
16/10/08 22:36:33.94 tA6BJFvJ.net
￥
840:１３２人目の素数さん
16/10/09 09:55:08.20 T1ly88NG.net
$
841:￥ ◆2VB8wsVUoo
16/10/09 10:18:25.03 t75Uv93o.net
￥
842:１３２人目の素数さん
16/10/09 18:03:54.15 iuUISe+C.net
>>791
あなたが何をやりたいのがこちらに伝わったら、
多分回答できると思うけど、やっぱり分からない。
丁寧に説明しようと努力しているの
843:はひしひしと伝わるのだが。 とりあえず、水色とクリーム色の棒グラフを再現すれば次のようようになる。 1. 描画する数値を計算する m1 <- matrix(c(30,0,30,30), 2) m2 <- matrix(c(-15,-15,0,-40), 2) 2. 描く barplot(m1, beside = TRUE, ylim = c(-40, 40)) barplot(m2, beside = TRUE, add = TRUE)
844:１３２人目の素数さん
16/10/09 18:06:32.85 iuUISe+C.net
>>807
abline(h=0)
を忘れていた。追加。
845:１３２人目の素数さん
16/10/10 10:47:31.22 nDVpiw1f.net
基準点をあわせるように自分でベクトルを平行移動させないと多分ムリ
何をやりたいのかは俺もさっぱり分からないけどｗ
846:743
16/10/13 18:40:49.69 BRFThXT1.net
x
month income_expense
1 2016-07 50
2 2016-07 -15
3 2016-08 30
4 2016-08 -75
x$id <- seq_along(x$income_expense)
x$type <- ifelse(x$income_expense > 0,
847:743
16/10/13 18:42:39.50 BRFThXT1.net
"in",
"out")
x[x$month %in% c("Starting Cash", "End Cash"),
"type"] <- "net"
month_type <- paste(x$month, x$type, sep="-")
x.paste<-cbind(x, month_type)
for (i in 1:(length(x.paste)/2)) {
x.paste$start5[2*i-1] <- ifelse(abs(x.paste$income_expense[2*i-1]) > abs(x.paste$income_expense[2*i]) , x.paste$income_expense[2*i],
0)
x.paste$end5[2*i-1] <- ifelse(abs(x.paste$income_expense[2*i-1]) > abs(x.paste$income_expense[2*i]) , x.paste$income_expense[2*i-1]+x.paste$income_expense[2*i],
x.paste$income_expense[2*i-1])
x.paste$start5[2*i] <- ifelse(abs(x.paste$income_expense[2*i-1]) > abs(x.paste$income_expense[2*i]) ,x.paste$income_expense[2*i] ,
x.paste$income_expense[2*i-1]+x.paste$income_expense[2*i])
x.paste$end5[2*i] <- ifelse(abs(x.paste$income_expense[2*i-1]) > abs(x.paste$income_expense[2*i]) , 0,
x.paste$income_expense[2*i-1])
}
png("Waterfall_bs01.png", width = 500, height = 300, pointsize = 12, bg = "white")
library(ggplot2)
ggplot(x.paste, aes(month_type, fill = type)) + geom_rect(aes(x = month_type,
xmin = id - 0.45, xmax = id + 0.45, ymin = end5,
ymax = start5))
graphics.off()
>> 801さん, 803さん
返答ありがとうございました。
基準線を合わせるように自分でベクトル平行移動させました。
geom_rectで描くことができました。
ありがとうございました。
848:￥ ◆2VB8wsVUoo
16/10/13 19:19:35.31 vumtC5Zn.net
￥
>349 名前：１３２人目の素数さん ：2016/09/22(木) 01:38:42.56 ID:CSzeBKOI
> 337 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 338 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 339 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 340 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 341 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 342 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 343 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 344 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 345 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
> 346 名前：あぼ～ん[NGName:￥ </b>◆2VB8wsVUoo <b>] 投稿日：あぼ～ん
>
849:￥ ◆2VB8wsVUoo
16/10/13 19:24:07.69 vumtC5Zn.net
￥
850:￥ ◆2VB8wsVUoo
16/10/13 19:24:26.79 vumtC5Zn.net
￥
851:￥ ◆2VB8wsVUoo
16/10/13 19:24:43.92 vumtC5Zn.net
￥
852:￥ ◆2VB8wsVUoo
16/10/13 19:24:59.90 vumtC5Zn.net
￥
853:￥ ◆2VB8wsVUoo
16/10/13 19:25:17.55 vumtC5Zn.net
￥
854:￥ ◆2VB8wsVUoo
16/10/13 19:25:35.26 vumtC5Zn.net
￥
855:￥ ◆2VB8wsVUoo
16/10/13 19:25:52.29 vumtC5Zn.net
￥
856:￥ ◆2VB8wsVUoo
16/10/13 19:26:09.67 vumtC5Zn.net
￥
857:￥ ◆2VB8wsVUoo
16/10/13 19:26:27.29 vumtC5Zn.net
￥
858:￥ ◆2VB8wsVUoo
16/10/13 19:26:44.51 vumtC5Zn.net
￥
859:１３２人目の素数さん
16/10/13 22:21:29.74 nyVxQQ1F.net
€
860:￥ ◆2VB8wsVUoo
16/10/14 03:34:44.81 WA0SUenS.net
￥
861:１３２人目の素数さん
16/10/19 20:13:01.33 eayAaE2q.net
R初心者の者です。
> c <- 10
> c(c = c)
c
10
となる理由がよく分かりません。
2行目のうち、最初のcが関数で、次のcがただの文字、最後のcが1行目のc(=10)ということですか？
よろしくお願いします。
862:￥ ◆2VB8wsVUoo
16/10/19 20:13:48.01 2Wa6Uw62.net
￥
>191 名前：１３２人目の素数さん ：2016/10/12(水) 14:26:06.21 ID:5WGW5M4m
> 「筑波大学准教授の強制わいせつ痴漢行為」に思う | 月光院璋子の日記
> URLﾘﾝｸ(plaza.rakuten.co.jp)
>
> 芳雄｢哲也の話にするな、忘れろ！奴は増田家の恥、もはや養子でさえない｣
>
863:￥ ◆2VB8wsVUoo
16/10/19 20:22:29.83 2Wa6Uw62.net
￥
864:￥ ◆2VB8wsVUoo
16/10/19 20:22:47.59 2Wa6Uw62.net
￥
865:￥ ◆2VB8wsVUoo
16/10/19 20:23:03.68 2Wa6Uw62.net
￥
866:￥ ◆2VB8wsVUoo
16/10/19 20:23:18.13 2Wa6Uw62.net
￥
867:￥ ◆2VB8wsVUoo
16/10/19 20:23:32.30 2Wa6Uw62.net
￥
868:￥ ◆2VB8wsVUoo
16/10/19 20:23:47.54 2Wa6Uw62.net
￥
869:￥ ◆2VB8wsVUoo
16/10/19 20:24:03.30 2Wa6Uw62.net
￥
870:￥ ◆2VB8wsVUoo
16/10/19 20:24:18.86 2Wa6Uw62.net
￥
871:￥ ◆2VB8wsVUoo
16/10/19 20:24:34.19 2Wa6Uw62.net
￥
872:￥ ◆2VB8wsVUoo
16/10/19 20:24:49.00 2Wa6Uw62.net
￥
873:￥ ◆2VB8wsVUoo
16/10/20 23:12:45.01 4i85UFaq.net
￥
874:￥ ◆2VB8wsVUoo
16/10/20 23:25:04.98 4i85UFaq.net
￥
875:￥ ◆2VB8wsVUoo
16/10/20 23:29:49.21 4i85UFaq.net
￥
876:￥ ◆2VB8wsVUoo
16/10/21 19:17:48.82 bLSYGql/.net
￥
877:１３２人目の素数さん
16/10/21 22:15:37.66 eqGGKWzQ.net
>>825
合ってるよ。
878:￥ ◆2VB8wsVUoo
16/10/21 22:18:35.89 bLSYGql/.net
￥
879:１３２人目の素数さん
16/10/21 22:53:24.77 kk6Osvdu.net
>>841
ご回答ありがとうございます！
880:￥ ◆2VB8wsVUoo
16/10/22 03:14:05.61 dMde0TVU.net
￥
>679 名前：１３２人目の素数さん ：2016/10/20(木) 08:48:57.82 ID:1+lfflhP
> 阪大ごときで研究者目指したらアカンやろw
>
>680 名前：￥ ◆2VB8wsVUoo ：2016/10/20(木) 08:53:56.11 ID:4i85UFaq
> ホウ、なるほどナ。
>
> ￥
>
>681 名前：￥ ◆2VB8wsVUoo ：2016/10/20(木) 09:21:36.53 ID:4i85UFaq
> そやし東大と京大以外の大学院は全部閉鎖せんとアカンわ。無駄やさかいナ。
>
> ￥
>
>682 名前：￥ ◆2VB8wsVUoo ：2016/10/20(木) 09:28:07.86 ID:4i85UFaq
> ほんで宮廷以外の数学科かて全部閉鎖せんとアカンわ。馬鹿板人みたいな
> 低能ゾンビばっかし居っても税金の無駄にナルだけで役に立たへんしナ。
>
> ￥
>
881:￥ ◆2VB8wsVUoo
16/10/22 03:18:56.51 dMde0TVU.net
￥
882:￥ ◆2VB8wsVUoo
16/10/22 03:19:15.84 dMde0TVU.net
￥
883:￥ ◆2VB8wsVUoo
16/10/22 03:19:35.54 dMde0TVU.net
￥
884:￥ ◆2VB8wsVUoo
16/10/22 03:19:53.64 dMde0TVU.net
￥
885:￥ ◆2VB8wsVUoo
16/10/22 03:20:12.39 dMde0TVU.net
￥
886:￥ ◆2VB8wsVUoo
16/10/22 03:20:31.04 dMde0TVU.net
￥
887:￥ ◆2VB8wsVUoo
16/10/22 03:20:50.12 dMde0TVU.net
￥
888:￥ ◆2VB8wsVUoo
16/10/22 03:21:19.32 dMde0TVU.net
￥
889:￥ ◆2VB8wsVUoo
16/10/22 03:21:37.86 dMde0TVU.net
￥
890:￥ ◆2VB8wsVUoo
16/10/22 03:21:54.27 dMde0TVU.net
￥
891:１３２人目の素数さん
16/10/22 17:06:34.82 XZKF8OyD.net
>>825
これ何かの本で見た覚えがあるんだけど思い出せない
892:１３２人目の素数さん
16/10/22 21:37:00.71 M7jVWcyA.net
>>855
R言語徹底解説です
893:１３２人目の素数さん
16/10/22 23:20:02.84 XZKF8OyD.net
>>856
ああ。今確認した。エクササイズ6.2.5の1か。
c(c=c)の最初のcがcombine関数の関数(省略)名cで、
二番目のc(c関数の引数の左辺値)がベクトルの構成要素の名前を定義するcで、
三番目のc(c関数の引数の右辺値)が前の行でcという名前で定義されているオブジェクト（の値）。
894:￥ ◆2VB8wsVUoo
16/10/23 02:03:11.21 3ZIBPF5r.net
￥
>269 名前：１３２人目の素数さん ：2016/09/24(土) 11:16:21.64 ID:ERaem3b8
> 生活保護受給者の三割がメタボだそうだ
> マス哲もそうなのか？
>
>270 名前：￥ ◆2VB8wsVUoo ：2016/09/24(土) 12:04:07.63 ID:gc7JIRwz
> 粗食してますんで、太ってはいますがまあ大丈夫そうですわ。今は精神科
> 系の強い薬物が一切必要が無いので、在任中よりも猛烈に健康になったと
> 思いますね。ストレスが何も無いっちゅうんはホンマに有り難いですわ。
>
> ￥
>
>271 名前：１３２人目の素数さん ：2016/10/22(土) 11:25:03.06 ID:EFTkFzKF
> どぴゅ
>
>506 名前：１３２人目の素数さん ：2016/06/11(土) 12:35:37.39 ID:Ise/AxZk
>
> 哲也はコンヌの黒歴史
>
>507 名前：１３２人目の素数さん ：2016/10/22(土) 11:24:37.17 ID:EFTkFzKF
> どぴゅ
>
895:￥ ◆2VB8wsVUoo
16/10/23 02:15:59.47 3ZIBPF5r.net
￥
896:￥ ◆2VB8wsVUoo
16/10/23 02:16:16.15 3ZIBPF5r.net
￥
897:￥ ◆2VB8wsVUoo
16/10/23 02:16:33.13 3ZIBPF5r.net
￥
898:￥ ◆2VB8wsVUoo
16/10/23 02:16:51.23 3ZIBPF5r.net
￥
899:￥ ◆2VB8wsVUoo
16/10/23 02:17:08.24 3ZIBPF5r.net
￥
900:￥ ◆2VB8wsVUoo
16/10/23 02:17:24.20 3ZIBPF5r.net
￥
901:￥ ◆2VB8wsVUoo
16/10/23 02:17:40.94 3ZIBPF5r.net
￥
902:￥ ◆2VB8wsVUoo
16/10/23 02:17:58.13 3ZIBPF5r.net
￥
903:￥ ◆2VB8wsVUoo
16/10/23 02:18:16.48 3ZIBPF5r.net
￥
904:￥ ◆2VB8wsVUoo
16/10/23 02:18:34.98 3ZIBPF5r.net
￥
905:１３２人目の素数さん
16/11/13 17:45:07.40 AJbUUUy0V
R-3.3.1 MagaiHin
R-3.2.5 Last
906:１３２人目の素数さん
16/11/14 05:39:42.16 LliUCPaqU
無料誹謗中傷対策のブッダワークス
URLﾘﾝｸ(www.buddha-works.net)
907:１３２人目の素数さん
17/03/18 22:10:26.69 9lKmiZM8.net
盛り上げていこうぜ！
908:１３２人目の素数さん
17/03/19 08
909::25:18.19 ID:BUbMna52.net
910:１３２人目の素数さん
17/03/30 22:10:28.44 K8rGc65l.net
Rってどれくらい使えたら役に立つんだ？ベイズ階層位はできんとだめ？
911:１３２人目の素数さん
17/03/31 16:49:02.43 LyGz7dL7.net
目的によるんじゃない? 考えてみ
912:１３２人目の素数さん
17/04/23 08:56:55.19 qEAq5gtK.net
R 3.4.0
URLﾘﾝｸ(www.r-project.org)
913:１３２人目の素数さん
17/04/24 23:49:44.87 38+Bilc8.net
>>873
Stanを使えばベイズ階層も苦にならない。
Samplingの待ち時間が苦痛かも。
914:１３２人目の素数さん
17/04/25 18:50:16.56 M0sS+FAa.net
>>875
おかげでアップデートに気づいたわ
ちなみにyou stupid darknessってどういう意味やろか？
915:１３２人目の素数さん
17/04/25 19:39:43.28 24RIix2u.net
URLﾘﾝｸ(kurtisscaletta.com)
916:１３２人目の素数さん
17/04/25 19:46:55.22 24RIix2u.net
1. なにそれ？
2. 暗いと不平を言うよりも、すすんで灯りをつけましょうって聞いたんだ。
3. それはそうだけど、世の常としてそう思わない人もいるだろうね。
4. 暗いぞバカヤロー！
って感じかな？
917:１３２人目の素数さん
17/04/26 11:52:55.96 tqLIcCJs.net
取引先の、統計をやってるという人と話をした。
名刺には「シニアスタティスティシャン」と書いてある。
話しをしてみると、統計学のダメな入門書に書いてあるような
大ウソを堂々と主張する。
だが相手は取引先であるから、「馬鹿かてめーは！」とか言えない。
言えないからここに書くのだが、
名刺に「シニアスタティスティシャン」とか書くなよ馬鹿たれが！
918:１３２人目の素数さん
17/04/26 11:59:53.14 tqLIcCJs.net
>>876
Stanって知らんかった。
便利そうだな使ってみる。
ありがとう！
919:869
17/04/26 12:31:23.28 Vq01HD2H.net
>>878
>>879
ありがとう
ピーナッツが読めるぐらいに英語が堪能ならなぁ
920:ま
17/04/28 19:19:21.81 10ctknwL.net
a＋b=C
921:ま
17/04/28 20:57:46.81 10ctknwL.net
>>883今の現代数学は間違ってできてるため、すうじでフっ素をあらわしてる。
そのため、人をすいとる。養分の話しか、してない。数学が人を、おしつぶして、時をすいとってしまった
数式をかえよう
X(f)が、あらたな、人を救う。数式。だということになるよね
922:ま
17/04/28 21:05:59.12 10ctknwL.net
４代元素が、すべて、支払いをし、責任をおうべきだと、思う。この世は、人間をつくり、だまし、最後には、すう式で、すいとってしまい、４代元素は次第には、元素になり、死にいたらしめる、などフリーメーソンなどつくった、元素からの安易な暗号の挑戦状なんだと思う
923:ま
17/04/29 02:13:36.09 PXwKZAGU.net
>>883 ａ＋ｂ=ａｂでいい。ｃ＋ｃ=ｃｃでいいと思うんだけど…
同じものを＋んだから、同じものになればいいわけで。ａ×90乗=ａで、いいいわけじゃない。なんか、変化して元素に、なるなら、回りのものも、全部元素にならないと、いけないのに、自分たちは、固くのこってて、これを、やりたいなら、人が死んでから、やるべき
924:ま
17/04/29 02:39:27.48 PXwKZAGU.net
>>886固くのこされた人の気持ちを考えるべき。だＥ=ＭＣ2にしたって
Ｅ=Ｃ2で、やるべきなのに、添字にＭを、そえて、そのエネルギーの座標に、人間をさしかえてるだけの、話しでね、
時間一次元と空間３次元の４成分だけ、もたされて、それを、吸う、すう、しき、とか、うけとるだけやないか。元素って。最初からＥ=Ｃ2で、この世を回すべき。
Ｅ=Ｍにかきかえるべきだ。それが、正しいと思うし。正当的。アルケーが歩け
元素はまちがった空間をつくっている
Ｅ=Ｃ2、または、Ｅ=Ｍ、で、場をつくるべき
相対性理論はまちがっている
死後の世界観を座標に４つ、ひきつける空間をもたせて、座標に吸わせることを、表しており、正当性のかけらもない
死後なら死後で座標をＣがやればいい。わけで、それを有限にしており、できなかった、のだ
だから、元素が悪いのだすべて火、土、水、空に原因がある
925:１３２人目の素数さん
17/04/29 02:58:57.49 OVQ3EEWI.net
馬鹿が現れた
926:１３２人目の素数さん
17/05/01 17:04:16.76 xPREFfVb.net
－δC２こうで
927:１３２人目の素数さん
17/05/01 17:09:14.52 xPREFfVb.net
>>883я
928:１３２人目の素数さん
17/05/01 17:12:13.05 xPREFfVb.net
タダシさ
929:１３２人目の素数さん
17/05/01 17:19:22.91 xPREFfVb.net
タダシさ＝こたえ
930:￥
17/05/08 20:06:42.83 OR+quqWp.net
￥
931:￥
17/05/08 20:14:24.76 OR+quqWp.net
￥
932:￥
17/05/08 20:14:49.35 OR+quqWp.net
￥
933:￥
17/05/08 20:15:09.69 OR+quqWp.net
￥
934:￥
17/05/08 20:15:31.60 OR+quqWp.net
￥
935:￥
17/05/08 20:15:52.66 OR+quqWp.net
￥
936:￥
17/05/08 20:16:14.65 OR+quqWp.net
￥
937:￥
17/05/08 20:16:41.12 OR+quqWp.net
￥
938:￥
17/05/08 20:17:02.39 OR+quqWp.net
￥
939:￥
17/05/08 20:17:24.76 OR+quqWp.net
￥
940:１３２人目の素数さん
17/05/18 12:12:04.69 b7yGK+hkS
ウィンドゥズにインストールされたRではR検定に合格できません。
R専用のスパコンでなければ、すべての解析ができないからです。
Fortran２００８の関数が導入してあるコンパイラーがあれば、検定用Rのパッケージが構築可能だとか
GCCはバージョン４．１２．５で導入予定。完成は未定です。
R Developersより
941:１３２人目の素数さん
17/05/25 19:49:56.38 zLanYWay.net
数値の20170501を2017-05-01ってな感じで日付に変換したいんですが、何か良い方法はないでしょうか。
力技は考えたんですが、100万行くらい変換しないといけないので、力技以外で変換したいんです。
942:１３２人目の素数さん
17/05/25 20:11:21.15 t+im+FUk.net
as.Date("20170501",format = "%Y%m%d")
943:￥
17/05/26 09:14:55.04 iCP5fMHR.net
￥
944:￥
17/05/26 09:15:13.28 iCP5fMHR.net
￥
945:￥
17/05/26 09:15:33.73 iCP5fMHR.net
￥
946:￥
17/05/26 09:15:55.04 iCP5fMHR.net
￥
947:￥
17/05/26 09:16:19.41 iCP5fMHR.net
￥
948:￥
17/05/26 09:16:43.19 iCP5fMHR.net
￥
949:￥
17/05/26 09:17:05.17 iCP5fMHR.net
￥
950:￥
17/05/26 09:17:26.87 iCP5fMHR.net
￥
951:￥
17/05/26 09:17:48.95 iCP5fMHR.net
￥
952:￥
17/05/26 09:18:09.48 iCP5fMHR.net
￥
953:１３２人目の素数さん
17/06/16 15:45:46.35 r+tPpOy0.net
R version 3.1.1ユーザです。
> a = 5
> is.double(a)
[1] TRUE
> is.integer(a)
[1] FALSE
のようにTRUEとFALSEが逆になってしまうのはなぜなんでしょう。
整数を代入するだけでは整数だと予測してくれないんでしょうか？
954:￥
17/06/16 16:12:39.43 TDPjrtUP.net
￥
>112 名前：￥ ◇2VB8wsVUoo 2017/06/15(木) 08:39:06.70 ID:7Rm0/VD6
> ★★★数学徒は情熱的な霊感により主観的に暮らし、唯ひたすら自己の世界に沈潜すべき。★★★
>
> 佐藤幹夫を見よ、ラマヌジャンを見よ
>
> 本物の￥
>
955:１３２人目の素数さん
17/06/16 17:21:40.28 nDRgYZZV.net
>>916
その代入だと実数として扱われる
a <- 5L
とすれば整数として扱われるようになる
956:￥
17/06/16 17:44:03.74 TDPjrtUP.net
￥
>112 名前：￥ ◇2VB8wsVUoo 2017/06/15(木) 08:39:06.70 ID:7Rm0/VD6
> ★★★数学徒は情熱的な霊感により主観的に暮らし、唯ひたすら自己の世界に沈潜すべき。★★★
>
> 佐藤幹夫を見よ、ラマヌジャンを見よ
>
> 本物の￥
>
957:￥
17/06/16 19:31:56.18 TDPjrtUP.net
￥
958:￥
17/06/16 19:32:16.87 TDPjrtUP.net
￥
959:￥
17/06/16 19:32:37.07 TDPjrtUP.net
￥
960:￥
17/06/16 19:32:57.87 TDPjrtUP.net
￥
961:￥
17/06/16 19:33:17.21 TDPjrtUP.net
￥
962:￥
17/06/16 19:33:35.76 TDPjrtUP.net
￥
963:￥
17/06/16 19:33:55.49 TDPjrtUP.net
￥
964:￥
17/06/16 19:34:15.63 TDPjrtUP.net
￥
965:￥
17/06/16 19:34:36.83 TDPjrtUP.net
￥
966:￥
17/06/16 19:34:57.09 TDPjrtUP.net
￥
967:907
17/06/17 10:07:37.47 oboZrWLI.net
>>918様
ユーザーが明示的に指定してやらないとすべて実数になっちゃうんですね？
お答えくださってどうも有難うございました。
968:￥
17/06/17 10:26:55.03 x2f6D4gs.net
★★★忖度と処世術に汚染された日本人：権威主義的な支配と損したくない人達★★★
～～～芳雄氏が言う『研究者としての基本的態度』とは一体何だろうか～～～
佐藤幹夫：自分自身の素朴な疑問に真剣に耳を傾ける。⇒不滅の金字塔を打ち立てる。
糞父芳雄：人間関係を駆使し他人を操り根回しを行う。⇒ハリボテお教授として君臨。
隠蔽の財務省、嘘吐きの文科省、そして問答無用に屈服させる官邸。コレでも先進国？
（佐藤師がしてたのは本物の研究だ。だが）芳雄氏がしてたのはケケケ、ケンキュウ。
外見を繕って偉そう見せさえすれば何でもヨロシ。ほんで教授になりさえすれば研究の
中身なんて何でもヨロシ。そもそも論文なんてモンは、外国の権威ある雑誌に掲載され
さえすれば、その中身のギロンなんて何でもヨロシ。そやし適当に書いてしまえ～～～
中身がダメだと知ってて、ソレでもSTAP論文を外国に投稿して受理される。発覚したら
適当に言い逃れる醜い態度。オツムのダメな大学院生に「虚偽の良品ラベル」を貼って
世間に出荷するハリボテ大学は詐欺行為そのもの。世間に媚びを売って客商売に徹し、
『売れさえすれば学生の脳の質なんて何でもヨロシ』と居直る大学。そしてブランド名
だけを見て仕入れる世間。●●は一流大学やさかい、きっと優秀なエリートやろｗｗｗ
中身を何も説明しないで、問答無用に上から押し付ける。ソレをイチャモンで騒いで、
そして邪魔して潰そうとする周囲の下々。大学教員も国会議事堂も、そして馬鹿板人の
遣ってる事も皆同じだ。日本人はバカ民族であり、今は外国にもちゃんとバレてるので
海外からも軽蔑されるだけであり、そのうちにどの国からも信用されなくなるだろう。
近視眼的で打算的な人生観を息子に押し付ける父親と、大脳に栄養が足りてない連中が
跋扈する永田町や霞が関に支配される国に住む不幸、一体どうしてくれるというのか。
☆☆☆数学徒が馬鹿板をしたらダメ。さもないと国家議事堂みたいになります。☆☆☆
￥
969:￥
17/06/17 12:35:00.60 x2f6D4gs.net
￥
970:￥
17/06/17 12:35:20.71 x2f6D4gs.net
￥
971:￥
17/06/17 12:35:41.80 x2f6D4gs.net
￥
972:￥
17/06/17 12:36:00.84 x2f6D4gs.net
￥
973:￥
17/06/17 12:36:21.78 x2f6D4gs.net
￥
974:￥
17/06/17 12:36:42.46 x2f6D4gs.net
￥
975:￥
17/06/17 12:37:03.93 x2f6D4gs.net
￥
976:￥
17/06/17 12:37:23.71 x2f6D4gs.net
￥
977:￥
17/06/17 12:37:59.24 x2f6D4gs.net
￥
978:￥
17/06/17 12:38:23.00 x2f6D4gs.net
￥
979:１３２人目の素数さん
17/07/23 16:07:33.29 AqYrJa+q.net
下のy式をもっとスマートに書く方法を教えてください
つまり、yの式は実際には+1, +2 …, +100までしなくてはいけないのです。
x <- 1:10
y <- c(sum((x+1)^2), sum((x+2)^2), sum((x+3)^2), …, sum((x+100)^2))
よろしくお願いします。
980:１３２人目の素数さん
17/07/23 16:33:37.21 FF49HrjI.net
z<-c()
for(i in 1:100){
z<-c(z, sum(x+i)^2))
}
でもできるけどダメ？
981:￥
17/07/23 16:35:16.97 r8UcZ6ry.net
〒〒〒馬鹿板は悪い習慣であり、この行為は脳を悪くする。そやし足を洗いなさい。〒〒〒
￥
982:１３２人目の素数さん
17/07/23 17:11:12.91 AqYrJa+q.net
>>943
ありがとうございます。一つ解決しました。
しかし、続いて教わった方法で、平均の最小2乗法による最小値を図示しようと思ったのですが
seq(0, 10, .01)を入れると、x軸がなぜか100倍されてしまします。
なぜなのか分かりませんか？おそらく、このforを使った解決策が
その後の応用（最小値を図示する）に適切でないのでしょうが
それがなんでなのか・・・（私はforについて、勉強し直します）
x <- c(3,5,6,8,2,9)
mean(x)
z<-c()
for(i in seq(from=0, to=10, by=.01)){
z<-c(z,sum(x-i)^2)
}
plot(z, type ="l") # x=5.5が最小のはずなのに、550が最小になっている