Specifying column class in html_table (rvest)

Ich verwende die html_table von rvest, um eine zweispaltige Konkordanztabelle von der folgenden Website zu lesen. Beide Spalten enthalten führende Nullen, die ich beibehalten möchte. Als solches möchte ich, dass die Spalten Klassencharakter haben. Ich benutze folgenden Code:

library(rvest)
library(data.table)

df <- list() 
for (j in 1:25) {
     url <- paste('http://unstats.un.org/unsd/cr/registry/regso.asp?Ci=70&Lg=1&Co=&T=0&p=',
           j, '&prn=yes', sep='') 
     webpage <- read_html(url) 
     table <- html_nodes(webpage, 'table') 
     df[[j]] <- html_table(table, header=TRUE)[[1]] 
     df[[j]] <- df[[j]][,c(1:2) ] 
}
ISIC4.NACE2 <- rbindlist(df) 

Allerdings gibt ein str (df [[1]]) @ zurü

'data.frame':   40 obs. of  2 variables:
$ ISIC Rev.4: chr  "01" "011" "0111" "0112" ...
$ NACE Rev.2: num  1 1.1 1.11 1.12 1.13 1.14 1.15 1.16 1.19 1.2 ...

Es scheint, dass die Funktion html_table die erste Spalte als Zeichen und die zweite Spalte als Zahlen interpretiert und dabei die führenden Nullen in letzteren abschneidet. Gibt es eine Möglichkeit, die Spaltenklasse mit html_table anzugeben?