2016-06-17 5 views
2

私はpaymentsと呼ばれるデータは、私がデータ・ベース今、私はそう代わりにそれがあることの、Week列の書式を変更する必要がData taken from databaseは、テーブル内のデータのフォーマットを変更する

から取ったその下のテーブルに格納されている(201625 )〜(2016-25)である。間にハイフンを追加するだけで、1年後と1週間後にはっきりさせることができます。もちろん 私はので、私は

pdm_data [2] <- as.numeric(gsub("6","-",as.character(pdm_data[ ,2]))) 

を使用してみましたが、これが唯一のスペースを作成し、その空間に

をハイフンを入れないで、検索するための実際の数を探し、データベースからデータを変更傾ける私を助けてください

+0

を1-9 '20160x'または' 2016x'週間ですか? 'gsub( '(?<=^\\ d {4})'、 ' - '、c( '200001'、 '20001'、 '201625')、perl = TRUEのデータをダウンロードしませんでした。 ' – rawr

+0

類似したhttp://stackoverflow.com/questions/18482929/regex-to-add-hypen-in-dates – rawr

答えて

1

str_replacestringrからパッケージ試してみてくださいそれを本当に感謝:

stringr::str_replace("201625", "(\\d{4})(\\d{2})", "\\1-\\2") 
[1] "2016-25" 
+0

まあ、列全体を変更するものがありますか?上のコードは列の行で変更されます –

+0

'str_replace'はベクトル化されています。したがって、 'pdm_data $ Week < - stringr :: str_replace(pdm_data $ Week、(\\ d {4})(\\ d {2}) '、' \\ 1 - \\ 2") 'は、カラム。 – Psidom

+0

それはうまくいった、ありがとう! –

関連する問題