タグ付けされた質問 「r」

Rに数値が整数かどうかをチェックする便利な関数が付属していないことを知って驚いた。 is.integer(66) # FALSE ヘルプファイルを警告： is.integer(x)x 整数を含むかどうかはテストしません！そのためには、例のround関数のように 、を使用しますis.wholenumber(x)。 この例には、このカスタム関数が「回避策」として含まれています。 is.wholenumber <- function(x, tol = .Machine$double.eps^0.5) abs(x - round(x)) < tol is.wholenumber(1) # is TRUE 上記のコメントを読んでいないと仮定して、整数をチェックする関数を作成する必要がある場合は、次のように機能する関数を作成します。 check.integer <- function(x) { x == round(x) } 私のアプローチはどこで失敗しますか？あなたが私の仮説の靴に乗っていたら、あなたの仕事はどうですか

104 r  integer  rounding 

たとえば、私がこれを持っている場合： n = c(2, 3, 5) s = c("aa", "bb", "cc") b = c(TRUE, FALSE, TRUE) df = data.frame(n, s, b) n s b 1 2 aa TRUE 2 3 bb FALSE 3 5 cc TRUE 次に、どのように私は2つの列を結合しないnとsという名前の新しい列にx、それはこのようになりますよう： n s b x 1 2 aa TRUE 2 aa 2 3 bb …

104 r  dataframe  multiple-columns  r-faq 

問題があります。複数のファイルを処理するループを実行しています。私の行列は巨大なので、注意しないとメモリが足りなくなることがよくあります。 警告が作成された場合にループから抜け出す方法はありますか？それはループを実行し続け、ずっと後で失敗したことを報告します...迷惑です。アイデアは、ああ賢いstackoverflow-ersですか？！

103 r  loops  warnings  break 

KnitRと、Rドキュメントとレポートを生成する際のMarkdownの使用について学び始めたところです。これは、私が自分の仕事に関係している多くの日々の報告に最適であるように見えます。ただし、私が気付いていないことの1つは、Markdown形式を使用してデータフレームとテーブルを印刷する簡単な方法です（のようなものxtableですが、LaTeXまたはHTMLの代わりにMarkdownを使用）。xtableからのHTML出力を埋め込むことができることは知っていますが、Markdownベースのソリューションがあるかどうか疑問に思っていましたか？

103 r  markdown  knitr  r-markdown 

列ヘッダーのあるdata.frameがあります。 data.frameから特定の行をリストとして（列ヘッダーをリストのキーとして）取得するにはどうすればよいですか？ 具体的には、私のdata.frameは ABC 1 5 4.25 4.5 2 3.5 4 2.5 3 3.25 4 4 4 4.25 4.5 2.25 5 1.5 4.5 3 そして、私は同等の行を取得したい > c(a=5, b=4.25, c=4.5) a b c 5.0 4.25 4.5

103 r  indexing  dataframe 

すぐ下のプロットをggplot2を使って再現したいと思います。近づくことはできますが、上と右の境界を削除できません。以下に、Stackoverflow上またはStackoverflow経由で見つかったいくつかの提案を含む、ggplot2を使用したいくつかの試みを示します。残念ながら、私はそれらの提案を機能させることができませんでした。 誰かが以下のコードスニペットの1つ以上を修正できる可能性があることを願っています。 ご提案ありがとうございます。 # desired plot a <- seq(1,20) b <- a^0.25 plot(a,b, bty = "l") library(ggplot2) df <- as.data.frame(cbind(a,b)) # 1. ggplot2 default ggplot(df, aes(x = a, y = b)) + geom_point() # 2. removes background color ggplot(df, aes(x = a, y = b)) + geom_point() + opts(panel.background = …

103 r  ggplot2 

特定の変数にテキスト文字列が含まれているdata.frameがあります。個々の文字列内の特定の文字の出現回数をカウントしたいと思います。 例： q.data<-data.frame(number=1:3, string=c("greatgreat", "magic", "not")) 文字列での "a"の出現回数を含むq.dataの新しい列を作成したい（つまり、c（2,1,0））。 私が管理した唯一の複雑なアプローチは次のとおりです。 string.counter<-function(strings, pattern){ counts<-NULL for(i in 1:length(strings)){ counts[i]<-length(attr(gregexpr(pattern,strings[i])[[1]], "match.length")[attr(gregexpr(pattern,strings[i])[[1]], "match.length")>0]) } return(counts) } string.counter(strings=q.data$string, pattern="a") number string number.of.a 1 1 greatgreat 2 2 2 magic 1 3 3 not 0

103 regex  r  dataframe 

私は現在scale_brewer()、塗りつぶしに使用していますが、これらは（画面上およびカラープリンターを介して）色が美しく見えますが、白黒プリンターを使用すると、比較的均一に灰色として印刷されます。オンラインggplot2ドキュメントを検索しましたが、塗りつぶしの色にテクスチャを追加することについて何も見つかりませんでした。ggplot2これを行う公式の方法はありますか、それとも誰かが使用するハックを持っていますか？テクスチャとは、黒と白で印刷したときに塗りつぶしの色を区別する、斜めのバー、逆の斜めのバー、ドットパターンなどのことを意味します。

103 r  ggplot2 

目標：同じ長さのベクトルのリストから、各ベクトルが行になる行列を作成します。 例： > a <- list() > for (i in 1:10) a[[i]] <- c(i,1:5) > a [[1]] [1] 1 1 2 3 4 5 [[2]] [1] 2 1 2 3 4 5 [[3]] [1] 3 1 2 3 4 5 [[4]] [1] 4 1 2 3 4 5 [[5]] [1] …

102 r  matrix  vector 

私が使用しているR CMD BATCH my_script.R実行するために端末からRスクリプトを。現在、コマンドに引数を渡したいところですが、機能させるためにいくつかの問題があります。私が行う場合はR CMD BATCH my_script.R blabla、その後blabla、むしろRスクリプトが実行されるのに利用できる引数として解釈されるより、出力ファイルになります。 引数として正しくRscript my_script.R blabla渡されるように見えるものを試しましたblablaが、取得したmy_script.Rout出力ファイルを取得できませんR CMD BATCH（.Routファイルが必要です）。私はコールの出力をリダイレクトすることもできますがRscript、私が選んだのファイル名に、私はある意味では、ファイルに含まR入力コマンド取得されることはないR CMD BATCHでない.Routファイルを。 したがって、理想的には、R CMD BATCHメソッドを介して実行されるRスクリプトに引数を渡すRscript方法を探してい.Routますが、比較可能なファイルを作成する方法がある場合は、それを使用したアプローチで満足します。

102 r  rscript 

Rで特定のCRANミラーを永続的に設定するにはどうすればよいですか？ 私がラップトップに永続的に設定して、を実行したときにinstall.packages()、どのミラーを選択するかを再度尋ねられないようにしたいと考えています。

102 r  cran  r-faq 

1）Rプロットにインテリジェントラベル配置を実装するRライブラリ/関数はありますか？私はいくつか試しましたが、すべて問題があります-多くのラベルが互いにまたは他の点（またはプロット内の他のオブジェクトですが、これを処理するのははるかに難しいことがわかります）のいずれかと重複しています。 2）そうでない場合、特定の問題点のラベル配置でアルゴリズムを快適に支援する方法はありますか？最も快適で効率的なソリューションが必要でした。 私の再現可能な例で他の可能性を試してテストして、私が持っているよりも良い結果を達成できるかどうかを確認できます。 # data x = c(0.8846, 1.1554, 0.9317, 0.9703, 0.9053, 0.9454, 1.0146, 0.9012, 0.9055, 1.3307) y = c(0.9828, 1.0329, 0.931, 1.3794, 0.9273, 0.9605, 1.0259, 0.9542, 0.9717, 0.9357) ShortSci = c("MotAlb", "PruMod", "EriRub", "LusMeg", "PhoOch", "PhoPho", "SaxRub", "TurMer", "TurPil", "TurPhi") # basic plot plot(x, y, asp=1) abline(h = 1, …

102 r  plot  label 

XMLからRへのデータフレームを解析しようとしましたが、このリンクは非常に役に立ちました。 xmlファイルからRデータフレームを作成する方法 しかし、それでも私は自分の問題を理解することができませんでした： これが私のコードです： data <- xmlParse("http://forecast.weather.gov/MapClick.php?lat=29.803&lon=-82.411&FcstType=digitalDWML") xmlToDataFrame(nodes=getNodeSet(data1,"//data"))[c("location","time-layout")] step1 <- xmlToDataFrame(nodes=getNodeSet(data1,"//location/point"))[c("latitude","longitude")] step2 <- xmlToDataFrame(nodes=getNodeSet(data1,"//time-layout/start-valid-time")) step3 <- xmlToDataFrame(nodes=getNodeSet(data1,"//parameters/temperature"))[c("type="hourly"")] 必要なデータフレームは次のとおりです。 latitude longitude start-valid-time hourly_temperature 29.803 -82.411 2013-06-19T15:00:00-04:00 91 29.803 -82.411 2013-06-19T16:00:00-04:00 90 私はで立ち往生していますxmlToDataFrame()、どんな助けも感謝します、ありがとう。

102 xml  r 

各文字に異なる値を割り当てることにより、文字列を使用していくつかの2次元ウォークを実行したいと思います。文字列の最初の文字を「ポップ」し、それを使用して、残りの文字列について繰り返します。 どうすればこのようなことを達成できますか？ x <- 'hello stackoverflow' 私はこのようなことができるようになりたいです： a <- x.pop[1] print(a) 'h' print(x) 'ello stackoverflow'

102 string  r 

質問： read.table / read.csvでcolClasses引数を使用するときに日付形式を指定する方法はありますか？ （私はインポート後に変換できることを理解していますが、このような多くの日付列があると、インポート手順で行うほうが簡単になります） 例： .csvという形式の日付列があります%d/%m/%Y。 dataImport <- read.csv("data.csv", colClasses = c("factor","factor","Date")) これは変換を間違ったものにします。たとえば、に15/07/2008なり0015-07-20ます。 再現可能なコード： data <- structure(list(func_loc = structure(c(1L, 2L, 3L, 3L, 3L, 3L, 3L, 4L, 4L, 5L), .Label = c("3076WAG0003", "3076WAG0004", "3076WAG0007", "3076WAG0009", "3076WAG0010"), class = "factor"), order_type = structure(c(3L, 3L, 1L, 1L, 1L, 1L, 2L, 2L, 3L, …

101 r  date  read.table  read.csv