Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
13 0 14 0 16 0 22 0 20 0 18 0
30 0 30 0 0 0 0 0 0 0 30 0
0 0 29 33 0 48 0 49 0 50 0 33
0 45 30 0 0 55 0 69 55 0 0 40
0 54 0 45 0 48 0 73 0 46 0 36
16 0 15 0 13 0 16 0 …fread我从包中读取了数据框的一列data.table。向量中大约一半的数字具有双精度，而另一半仅具有整数精度。
head(data$value)
#[1] 3 1.2 3.1 1 1.0 5
我想按精度将向量分成两个，但是当我使用该typeof函数时，所有值都以双精度形式返回，因此我无法使用它来区分两者。
输出将产生两个独立的向量，例如：
single <- c(3,1,5)
double <- c(1.2,3.1,1.0)