• [解決済み] RのUndoコマンド

    質問 Rでundoコマンドのようなものが見つかりません(An Introduction to RやR in a Nutshellにも載っていません)。私は特にインタラクティブなグラフを扱う際の取り消し/削除に興味があります。 どのようなアプローチがお勧めですか? 解決方法は? を導く別のアプローチを検討する必要があります。 再現性 の仕事をします。 好きなエディタを選

    2022-02-12 13:39:24
  • [解決済み】R 置換する項目数が置換長の倍数でない/しかし結果は正しい

    質問 この件に関するスレッドが既にあることは知っていますが、それらを見ても何が問題なのか分かりませんでした - その点はご容赦ください。 コードを実行しようとしているところです for (i in 1:a){ matrix$new_column[i]<-which(matrix[i,1:b-1]==matrix$col_b[i]) } 私が試みているのは に

    2022-02-12 12:57:17
  • [解決済み] lis[[i]]でエラー:1つ未満の要素を選択しようとした

    質問 このコードは、ある与えられた座標の総距離を計算するものですが、なぜかうまくいきません。 というエラーが出ます。 Error in lis[[i]] : attempt to select less than one element. 以下はそのコードです。 distant<-function(a,b) { return(sqrt((a[1]-b[1])^2+(a[2

    2022-02-12 11:44:46
  • [解決済み] RでのMLEエラー:'vmmin'の初期値が有限でない

    質問 を2つ持っているとします。 data.frame オブジェクトを作成します。 df1 <- data.frame(x = 1:100) df1$y <- 20 + 0.3 * df1$x + rnorm(100) df2 <- data.frame(x = 1:200000) df2$y <- 20 + 0.3 * df2$x + rnorm(200000)

    2022-02-12 11:34:13
  • [解決済み] bind_rows_(x, .id) のエラー : 引数 1 には名前を指定する必要があります。

    質問 以下はコードスニペットです。 y <- purrr::map(1:2, ~ c(a=.x)) test1 <- dplyr::bind_rows(y) test2 <- do.call(dplyr::bind_rows, y) の最初の呼び出しは bind_rows ( test1 ) はエラーを発生させます。 Error in bind_rows_(x

    2022-02-12 11:06:18
  • [解決済み] rpart()でkフォールドクロスバリデーションをOFFにする方法

    質問 Bitcoinの時系列データで、11種類のテクニカル指標を特徴量として使用し、回帰木に当てはめたいと考えています。rpart()はk-foldクロスバリデーションで最適なコスト複雑性パラメータcpを検証していますが、tree()ではcpの値を指定することができません。 cv.tree() がクロスバリデーションで cp の最適値を探すことは知っていますが、やはり cv.tee()

    2022-02-12 09:31:42
  • [解決済み] R: anova.lm(g)において:本質的に完全な適合に対するANOVAのF-テストは信頼できない

    質問 オンラインガイドと古いテキストを組み合わせてRを学習しています(182ページ~)。 http://cran.r-project.org/doc/contrib/Faraway-PRA.pdf ). Rのパッケージからデータを使用する場合(チュートリアルの例のように)、何の問題もありません。しかし、私のテキストからデータを使用する場合、私はいつもF値なしと警告で終わります。 見て

    2022-02-12 09:31:03
  • [解決済み] 先頭にゼロを付けるには?

    質問事項 次のようなデータセットがあります。 anim <- c(25499,25500,25501,25502,25503,25504) sex <- c(1,2,2,1,2,1) wt <- c(0.8,1.2,1.0,2.0,1.8,1.4) data <- data.frame(anim,sex,wt) data anim sex wt an

    2022-02-12 07:20:46
  • [解決済み】R: predict() の数値 'envir' 引数が長さ1でない。)

    質問 の値を予測しようとしています。 R を使用しています。 predict() 関数で、変数をモデルに渡すことで実現できます。 以下のようなエラーが発生します。 Error in eval(predvars, data, env) : numeric 'envir' arg not of length one 以下は私の data frame 、名前df。 df

    2022-02-12 02:47:54
  • [解決済み] ggplot set scale_color_gradientn を手動で設定する。

    質問 次のようなデータフレームがあります。 BP R2 LOG10 96162057 0.2118000 2.66514431 96162096 0.0124700 0.31749391 96162281 0.0008941 0.07012148 96163560 0.5011000 2.48505399 96163638 0.8702000 3.37778598

    2022-02-12 01:53:49
  • [解決済み】Rで文字ベクトルから引用符を削除する

    質問 文字ベクトルがあるとします。 char <- c("one", "two", "three") インデックス値を参照させると、次のようになります。 > char[1] [1] "one" 戻り値から引用符を取り除くと、次のようになりますか? [1] one 解決方法は? as.name(char[1]) は動作しますが、なぜこのようなことをした

    2022-02-11 21:40:05
  • [解決済み] ヒートマップエラー : 'x' は数値行列でなければなりません。

    質問 この質問は重複しているかもしれませんが、このフォーラムに投稿された解決策をいくつか試していましたが、成功しなかったので、ここに投稿しています。 まず、再現性を高めるために私のデータセットから見てみましょう。 dataset <- structure(list(Comparison = c("SH vs SAP", "SH vs NEA", "SH vs ERE", "SH

    2022-02-11 18:20:33
  • [解決済み] as.vector(x) でエラー : この S4 クラスをベクトルに強制するメソッドはありません。

    質問 bashのコマンドラインでRスクリプトを実行しようとしています(CentOS 8を使用しています)。 cat 1_myScript.R | R --slave --args $SAMPLE"_x" $SAMPLE"_y" ここで、$SAMPLEは、私がRスクリプトで以下のように指定した引数です。 > args<-commandArgs() > aaa&l

    2022-02-11 18:05:14
  • [解決済み] idata.frame()の結果はどのように使用するのですか?

    質問 評判の良い idata.frame() 関数が、私が期待するような形でイミュータブルなデータフレームを返してくれません。 私が見たすべての例では、単に idata.frame(baseball) を新しい変数に追加して作業を開始しましたが、この関数から予期しない結果を得ました。 > ibb <- idata.frame(baseball) > str(i

    2022-02-11 17:20:43
  • [解決済み] aggregate() で "invalid 'type' (character of argument)" エラーが発生する。

    質問 以下のようなCSVがあります。 color,val2,val3 blue,1,4 green,7,3 blue,4,2 red,9,3 red,2,6 blue,1,7 単純に色で集計したい。 試しているとき csv <- read.csv("/home/user/file.csv", stringsAsFactors=FALSE) data <-aggreg

    2022-02-11 14:45:17
  • [解決済み] forループを用いた二重和算

    質問 Rでかなり複雑な式の二重合計をしようとしているのですが、forループが期待通りに動いていないような気がします。 以下は、私がやろうとしている複雑なことの基本的なバージョンです。 \sum_{I=3}^{5}\sum_{j=2}^{3} (I*j) これで3*2+3*3+4*2+4*3+5*2+5*3のようにすべての項を合計してほしいのだが。 で、60になります。しかし、私が

    2022-02-11 14:27:29
  • [解決済み] Rの特定の文字列を含む行を削除する

    質問 REVERSE"という文字列を含む行を除外したいのですが、行がその単語と完全に一致するわけではなく、含まれているだけです。 私の入力データフレームです。 Value Name 55 REVERSE223 22 GENJJS 33 REVERSE456 44 GENJKI 私が期待する出力

    2022-02-11 13:13:47
  • [解決済み] 無効な '行.名' の長さ

    質問 TraMineR(バージョン1.8.4)のseqdef-funcitonを使ってシーケンスオブジェクトを定義しようとしているのですが、いつもこんな意味のわからないエラーメッセージが表示されます。 Error in row.names<-.data.frame ( *tmp* , value = value) : 無効な'row.names'の長さ 私のコード入力は

    2022-02-11 12:37:28
  • [解決済み] オブジェクトを渡すとエラーになる

    質問 次のコードは、95%信頼区間の下限と上限を返すと思ったのですが、どうでしょうか? confint95 = function(mean, se) { confint = abs(se*1.96) lower = abs(mean-cint) upper = abs(mean+cint) return(lower,upper) } しかし、これではこのようなメッセ

    2022-02-11 10:59:40
  • [解決済み] dplyrでplyr::mapvaluesを使用する

    質問 plyr::mapvalues はこのように使用することができます。 mapvalues(mtcars$cyl, c(4, 6, 8), c("a", "b", "c")) しかし、これではうまくいきません。 mtcars %>% dplyr::select(cyl) %>% mapvalues(c(4, 6, 8), c("a", "b", "c")) %&g

    2022-02-11 10:45:07