如何在R中重新排列数据帧

我有一个简单的问题，但由于对R非常陌生，我似乎无法解决它。我有以下结构的数据帧：

         V1    V2   V3   V4
STATE    0     0    1    1
Period   1     2    1    2
avg_FTE  40    35   42   35 

我想将其重新安排如下：

STATE      0     1 
Period 1   40    42
Period 2   35    35

我想答案很直截了当，但出于某种原因，这让我大吃一惊

非常感谢

库（重塑）
library(reshape)
Input = (
  'V1    V2   V3   V4
STATE    0     0    1    1
Period   1     2    1    2
avg_FTE  40    35   42   35 ')
df = read.table(textConnection(Input), header = T)
df <- as.data.frame(t(df))
t(dcast(df, STATE~Period, fill=0))
      [,1] [,2]
STATE    0    1
1       40   42
2       35   35

输入=(
'V1 V2 V3 V4
状态0 0 1 1
第12段
平均FTE 40 35 42 35'）
df=read.table（文本连接（输入），标题=T）
df附加溶液

library(tidiverse)
df %>% 
  t() %>% 
  as.data.frame() %>% 
  pivot_wider(id_cols = Period, names_from = STATE, values_from = avg_FTE)

library(tidiverse)
df %>% 
  t() %>% 
  as.data.frame() %>% 
  pivot_wider(id_cols = Period, names_from = STATE, values_from = avg_FTE)