You can try it scan. The comment symbol indicator is comment.charoff by default. And you can add nlines = 1to get only the first line from the file.
x <- "# 12 0.44 0.001 0.94444 123.3455 0.0000001 3432.0 2 1 1 12.2"
as.numeric(scan(text = x, what = "", nlines = 1)[-1])
So it should be fine if you replace text = xwith your file name.