dplyrを使用してdf内のすべての変数の名前を変更し、最初の観察を削除します

Question

csvファイルからデータフレームをインポートしました。データフレームはかなり醜いです。すべての変数の名前を最初の観測の値に変更し、この最初の観測を削除したいと思います。私の同僚は私にこのコードでアイデアを与えました。

colnames(df) <- lapply(df[1, ], as.character) 
df <- df[-1,] 

上記のコードは完璧に動作しますが、私はdplyr :-)を愛するそれを用いたパイプを行い、dplyrする方法はありますか？

PS：私は何かばかげて言っても申し訳ありません。私はRの初心者です。これはStack Overflowの最初の質問です。

Answer 1

set.seed(1984) 

require(dplyr) 

## simulating a data frame 

df <- data.frame(a = 1:10, 
       b = sample(LETTERS,10, replace = T), 
       c = sample(letters,10, replace = T), 
       stringsAsFactors = F) 




    head(df) 


    a b c 
    # 1 1 P y 
    # 2 2 A j 
    # 3 3 P o 
    # 4 4 W u 
    # 5 5 U a 
    # 6 6 E k 

df %>% 
    filter(row.names(.) == 1) %>% 
    as.character(.) -> names(df) 

df 



    #  1 P y 
    # 1 1 P y 
    # 2 2 A j 
    # 3 3 P o 
    # 4 4 W u 
    # 5 5 U a 
    # 6 6 E k 
    # 7 7 W o 
    # 8 8 P h 
    # 9 9 N b 
    # 10 10 O f