Converter fatores em 2 quadros de dados de uma lista em numéricos
Estou tendo problemas para converter as colunas de 2 quadros de dados em uma lista para numérico. No momento, os dois quadros de dados têm 2 colunas que consistem em fatores. Quero convertê-los para numéricos para que eu possa fazer operações matemáticas neles. Abaixo está o código de exemplo:
library(XML)
bal <- "http://www.baseball-reference.com/teams/BAL/2014-schedule-scores.shtml"
bos <- "http://www.baseball-reference.com/teams/BOS/2014-schedule-scores.shtml"
mylist <- list(bal, bos)
a <- lapply(mylist, readHTMLTable)
b <- lapply(a, function(x) x[["team_schedule"]][, c("R", "RA")])
c <- as.numeric(as.character(b))
Quando executo esse código, recebo:
> c
[1] NA NA
> str(c)
num [1:2] NA NA
Aqui está a estrutura de b:
> str(b)
List of 2
$ :'data.frame': 165 obs. of 2 variables:
..$ R : Factor w/ 13 levels "","0","10","11",..: 6 6 7 8 10 7 6 5 9 2 ...
..$ RA: Factor w/ 13 levels "","0","1","10",..: 3 9 7 4 10 3 7 8 7 6 ...
$ :'data.frame': 166 obs. of 2 variables:
..$ R : Factor w/ 10 levels "","0","1","2",..: 3 8 6 4 8 2 7 9 6 3 ...
..$ RA: Factor w/ 13 levels "","1","10","14",..: 5 5 6 9 10 7 2 3 5 7 ...
O que devo fazer de diferente para converter os fatores em valores numéricos?