1
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 3 years have passed since last update.

Rtipsアタック25【解答編】Advent Calendar 2021

Day 2

A.フォルダ内の全てのファイルを読み込む

Last updated at Posted at 2021-12-01

これが必要になった実際のケースは,次のようなものでした。

  • Web調査で複数の調査票を用意し,調査後にそれぞれダウンロードしたから,同じ内容の調査票なのに複数のデータファイルができてしまった。
  • 二相三元データを収集したので,二相データが複数のファイルに分かれて入っている
  • エクセルの各シートに実験状況ごとのデータを分けて保存しちゃいました

まあ他にも,実務的なシーンでこういうことがあるかもしれない。データはあるフォルダに集めてあるんだけど,ファイル名の統一もないし,とにかく全部読み込みたいんだけど,というような。

アルゴリズムの確認

やるべきことを確認しておきましょう。

  1. 目指すフォルダのファイルリストを収集する
  2. 繰り返し読み込む
  3. 整形する

です。次のようなコードで実行できます。

list.files("dataset/", full.names = T) %>%
  purrr::map(read_csv) %>% 
  dplyr::tibble() %>%
  dplyr::rename(rawdata = ".") %>%
  tibble::rowid_to_column("ID")

私がpurrr::mapを使ったのはこれが初めて。このときやっと「便利だなあ」と理解しましたよ。

こんな感じで,自分のTips,こんなバグをこうやって解決したよ,というような話を,よろしければ皆さんもお寄せください。
出題編はこちらです。
あるいは「こちらの解法のほうが美しいぞ」というのがありましたら,コメントいただけると幸いです。

1
0
4

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
1
0

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?