Довольно много опытных разработчиков дали" Вотум недоверия Платформы Объекта.NET ADO ", как обсужден далее здесь .
я думаю, что мы ожидаем, что он будет значительно улучшен в .Net 4.0 командой ADO.NET.
И вот являются [приблизительно 113] видео от недавнего PDC.
Возможно, есть способ лучше, но вот два подхода с strsplit ()
:
as.numeric(data.frame(strsplit(tmp3, " "))[2,])
as.numeric(lapply(strsplit(tmp3," "), function(x) x[2]))
as.numeric () может не понадобиться, если вы можете использовать символы ...
Можно использовать read.table
в textConnection
:
X <- read.table(textConnection(tmp3))
затем
> str(X)
'data.frame': 10 obs. of 2 variables:
$ V1: int 1500 1500 1510 1510 1520 1520 1530 1530 1540 1540
$ V2: int 2 1 2 1 2 1 2 1 2 1
, так что X $ V2
- это то, что вам нужно.
Я считаю наиболее элегантным способом сделать это
> res <- sapply(strsplit(tmp3, " "), "[[", 2)
Если вам нужно, чтобы оно было целым числом
> storage.mode(res) <- "integer"
substr(x = tmp3, start = 6, stop = 6)
Пока ваши строки всегда имеют одинаковую длину, это должно помочь.
(И, конечно, вам не нужно указывать имена аргументов - substr (tmp3, 6, 6)
тоже отлично работает)
Это должно сработать:
library(plyr)
ldply(strsplit(tmp3, split = " "))[[2]]
Если вам нужен числовой вектор, используйте
as.numeric(ldply(strsplit(tmp3, split = " "))[[2]])