dataframe von character zu numeric umwandeln

[Printemps]

Hallo! Wie kann ich den folgenden Befehl erweitern, so dass R alle Spalten zu numeric umwandelt, bis auf die erste?

P_BRB_Stadt <- as.data.frame(apply(P_BRB_Stadt, 2, as.numeric))

Vielen Dank!