请问如何将字符型变量始末的单引号去掉？谢谢！

priss111 发表于 2011-9-30 11:50
谢谢！

我的程序里面的dat必须是大小为n x 1的data frame

qoiqpwqr 发表于 2011-9-30 12:07
我的程序里面的dat必须是大小为n x 1的data frame

谢谢！

可以了。

另外请问：
功能类同于nchar函数，
但针对数值变量的是哪个函数？



card= read.csv(file="CARD.csv", hearder=TRUE, sep=",")
n=length(card) #n==78
mode(card) # list
mode(id) # numeric
id[1:10]
###[1] ‘13294497’ ‘20455648’ ‘-148209’  ‘8661261’  ‘24742283’ ‘15966960’
[7] ‘-150598’  ‘18323141’ ‘11718213’ ‘20574307’

idd=id
mode(idd) # numeric
n=length(idd) #21900
iddd=as.matrix(idd)
dim(iddd)
[1] 21900     1
iddd[1:10]
[1] "‘13294497’" "‘20455648’" "‘-148209’"  "‘8661261’"  "‘24742283’"
[6] "‘15966960’" "‘-150598’"  "‘18323141’" "‘11718213’" "‘20574307’"

> removeQuote <- function(iddd) substr(iddd, 2, nchar(iddd) -1)
> aa=apply(iddd, 1, removeQuote) 警告信息：
In aperm.default(X, c(s.call, s.ans)) :
  Reached total allocation of 1535Mb: see help(memory.size)
> aa[1:10]
[1] "13294497" "20455648" "-148209"  "8661261"  "24742283" "15966960"
[7] "-150598"  "18323141" "11718213" "20574307"
> mode(aa)
[1] "character"
> length(aa)
[1] 21900
> aanumeric=as.numeric(aa)
> aanumeric[1:10]
[1] 13294497 20455648  -148209  8661261 24742283 15966960  -150598 18323141
[9] 11718213 20574307

priss111 发表于 2011-9-30 13:07
谢谢！

可以了。

还是nchar

> x <- -2.456
> nchar(x)
[1] 6

qoiqpwqr 发表于 2011-9-30 21:22
还是nchar

> x  nchar(x)

哦，
谢谢！

请问下面这个警告信息时因为R运行时计算机的内存不够引起的？

> removeQuote <- function(iddd) substr(iddd, 2, nchar(iddd) -1)
> aa=apply(iddd, 1, removeQuote) 警告信息：
In aperm.default(X, c(s.call, s.ans)) :
  Reached total allocation of 1535Mb: see help(memory.size)

priss111 发表于 2011-9-30 23:09
哦，
谢谢！

应该是的。看看memory.size把内存限制调高些。

qoiqpwqr 发表于 2011-10-1 00:06
应该是的。看看memory.size把内存限制调高些。

o,
tks.


> bb=memory.size
> bb
function (max = FALSE)
round(.Internal(memory.size(max)), 2L)
<environment: namespace:utils>

qoiqpwqr 发表于 2011-10-1 00:06
应该是的。看看memory.size把内存限制调高些。

o,
tks.


> bb=memory.size
> bb
function (max = FALSE)
round(.Internal(memory.size(max)), 2L)
<environment: namespace:utils>

qoiqpwqr 发表于 2011-9-29 20:54
单引号是用来表示该变量是字符型变量，它本身不占字符数
> a  nchar(a)
[1] 8

如果是不全是数字的字符型变量，例如 “X1”，能把引号去掉吗？