字符串拆分整列

Question

下面的代码生成一列数据的第一个元素的向量（ncv.gender $ Identity Number）。结果显示出来。 显示列中每个元素的结果需要什么代码？

ID <- as.numeric(strsplit(as.character(ncv.gender$`Identity Number`), "")[[1]])
ID
#[1] 9 4 1 2 0 7 0 6 0 4 0 8 5

谢谢