dplyrで変数の名前を変更

Question

left_joinの後に変数var1.x var2.x ...とvar1.y var2.yがあります。私はvar1_tot var2_totとvar1_part var2_partに名前を変更したいと思います。私はこれを行うことができますが、namesと文字列置換機能を組み合わせています。 dplyrのrenameファンクションとends_withファンクションを使用して、これをdplyrチェーンの一部として実行できますか？

Answer 1

このようにしますか？ dtはデータフレームの一例です。 dt2が最終出力です。実際

mydf %>% rename_at(vars(ends_with(".x")),funs(str_replace(.,".x","_total"))) 

で

library(dplyr) 

dt <- data_frame(var1.x = 1:3, var2.x = 4:6, var1.y = 7:9, var2.y = 10:12) 

dt2 <- dt %>% 
    rename_at(vars(ends_with(".x")), funs(sub(".x", "_tot", .))) %>% 
    rename_at(vars(ends_with(".y")), funs(sub(".y", "_part", .))) 
dt2 
# A tibble: 3 x 4 
    var1_tot var2_tot var1_part var2_part 
    <int> <int>  <int>  <int> 
1  1  4   7  10 
2  2  5   8  11 
3  3  6   9  12 

Answer 2

は、代わりに私がstringr` `から` str_replace`を使用してみました `sub`の