次のタグが付いている話題の回答:

3
Accepted

まとめられたデータフレームを展開する

tidyr パッケージの fill 関数を使うと、 NA値をその列の直前の NA でない値で埋められます。 > library(dplyr) > library(tidyr) > df1 <- dplyr::data_frame(no1 = c(1L, 3L, 4L, 6L), + no2 = c(14L, 25L, ...
ksmzn's user avatar
  • 146
2
Accepted

dplyrを用いてデータフレーム内の型を統一したい

mutate_ifやmuatate_at関数を利用して、対象のデータ型あるいは変数を指定できます。 例のirisデータセットの数値が あらかじめ数値型としてセットされているので、一旦文字列型に変更しています str(iris) 'data.frame': 150 obs. of 5 variables: $ Sepal.Length: num 5.1 4.9 4.7 4.6 5 5....
user3291555's user avatar
2

dplyrを用いてデータフレーム内の型を統一したい

data.tableを使うことができると思います。 library(data.table) #test data DT <- data.frame(a = c("1", "2", "3"), b = 4:6, c = as.factor(7:9), stringsAsFactors = FALSE) ...
MichaelChirico's user avatar
2
Accepted

Rのパッケージのロードが失敗する

おそらく,以下の内容が今回の問題に近いと思います: https://stackoverflow.com/questions/31717850/error-package-or-namespace-load-failed-for-ggplot2-and-for-data-table エラーメッセージを読んだ限りでは,scalesパッケージの名前空間がうまく読み込めていないようですので,...
kazutan's user avatar
  • 311
1

rowwiseからのmutate

purrr::pmap()を使うのが良いかと思います。 # irisデータの"Sepal"から始まる最大値をmutate iris %>% mutate(max = select(., starts_with('Sepal')) %>% pmap(., ~ max(.)))
kenken's user avatar
  • 116
1

データフレームの複数列を一つの列で割る

とりあえず書いてみました。 こんな感じでどうでしょうか。 Python版 import pandas as pd df = pd.DataFrame({'a1':[1,3,3],'a2':[1,4,6],'a3':[2,2,2],'b1':[4,1,9]}) df.join(df.loc[:, :'a3'].div(df['b1'], axis=0).add_prefix('d_')) # ...
magichan's user avatar
  • 1,971
1

データフレームの複数列を一つの列で割る

pandasならこうでしょうか。 df1 = pd.DataFrame([[1,1,2,4], [3,4,2,1], [3,6,2,9]], columns=["a1","a2","a3","b1"]) df2 = df1.div(df1["b1"], axis=0).drop("...
orangecat's user avatar
  • 986
1
Accepted

Rで連番のデータフレームを加工して連番で出力する

こういう感じのコードではどうでしょうか: # パッケージ読み込み library(tidyverse) # テスト用にdata.frame作成 # 以下のコードでdata1-data3というdata.frameができます data_list <- paste("data", 1:3, sep = "") for(i in 1:length(data_list)) { assign( ...
kazutan's user avatar
  • 311
1
Accepted

dplyr & ggplot2: リストに入った回帰分析の結果をまとめて図にする

lmRes_setはロング形式ではない、処理し難いデータとなっています。まずはこれをロング形式化し、以降の処理を行っていく形となります。 temp <- population %>% group_by(setid) %>% do(model1 = tidy(lm(score ~ age, data = .)), model2 = tidy(lm(score ~ ...
cuttlefish44's user avatar
1

dplyrを用いてデータフレーム内の型を統一したい

dplyrパッケージのmutate_if()には直で否定演算子を入れる事はできませんが、function(col)を用いることで、FALSEなカラムのみに関数を適応、を簡潔に実現できます。 test <- iris %>% mutate_if(function(col) !is.numeric(col), as.numeric) head(test, n=2) # Sepal....
cuttlefish44's user avatar
1
Accepted

データ前処理の関数化について

assign()したデータフレーム名 (namesではなくfilesの方を用いています) をeval(parse(text = ~))で処理する方法でやってみました。eval(parse(text = files)ではfilesの最後の要素のみしか読んでくれないため、lapply()でリストに出力しbind_rows()で全リスト要素を結合させ、最後にtblをdata.frame化しています (...
cuttlefish44's user avatar
1

データ前処理の関数化について

回答として適切かわかりませんが単に連番からなるファイルを読み込むには、 foreachパッケージを使うと楽だったりします。foreach()関数の引数に.combineというものがあり、 これにrbind(行方向での結合)を指定し、対象のファイル名の番号の部分をiterationとして与えると勝手に結合してくれます。 パイプ演算子を使って読み込み後の処理を加えることも可能です。 library(...
user3291555's user avatar
1
Accepted

パネルデータの同一IDの標本の絞り込み

一度、欲しい形のIDとPANELのセットだけを含むテーブルを作成し、 それに結合してはどうでしょうか? master <- data %>% group_by(ID) %>% dplyr::summarise(PANEL = max(PANEL)) dplyr::left_join(master, data, by = c("ID", "PANEL"))
thistle's user avatar
  • 61
1

Rで生成したデータの前処理

これは必要以上にネストを深くしすぎていると思います。 詳しくないのですが、p,q,r,sを引数に取ってモデルのAICを返す関数をつくって、それに次数の組を渡すようなやり方ではだめなのでしょうか? expand.grid()で変数の組み合わせをつくれます。わかりやすくfor文で書くならこんな感じです。 f <- function(p,q,r,s) { ...略... fit <...
yutannihilation's user avatar

Only top scored, non community-wiki answers of a minimum length are eligible