Question

比较字符串与as.numeric的转换以及可以<{1}}完成的方式。

read.fwf

现在从包含“5 7 12 4”的文件“fwf.txt”中读取。

as.numeric("457")  # 457
as.numeric("4 57") # NA with warning message

现在，我会注意到在“数字”版本中，foo<-read.fwf('fwf.txt',widths=c(5,5),colClasses='numeric',header=FALSE) V1 V2 1 57 124 foo<-read.fwf('fwf.txt',widths=c(5,5),colClasses='character',header=FALSE) V1 V2 1 5 7 12 4以与Fortran相同的方式进行连接。我只是有点惊讶它不会像read.fwf那样抛出错误或NA。谁知道为什么？

Answer 1

正如@ eipi10指出的那样，空间消除行为并非read.fwf所独有。它实际上来自scan()函数（由read.table使用的read.fwf）。实际上，scan（）函数将在处理输入流时从任何非字符的值中删除空格（如果未指定为分隔符，则删除制表符）。一旦它有＆＃34;清洁＆＃34;空格的值，然后它使用与as.numeric相同的函数将该值转换为数字。对于字符值，它不会取出任何空格，除非您设置strip.white=TRUE，它只会从值的开头和结尾删除空格。

观察这些例子

scan(text="TRU E", what=logical(), sep="x")
# [1] TRUE
scan(text="0 . 0 0 7", what=numeric(), sep="x")
# [1] 0.007
scan(text=" text    ", what=character(), sep="~")
# [1] " text    "
scan(text=" text book   ", what=character(), sep="~", strip.white=T)
# [1] "text book"
scan(text="F\tALS\tE", what=logical(), sep=" ")
# [1] FALSE

您可以在scan()中找到/src/main/scan.c的来源，并且导致此行为的具体部分为around this line。

如果您希望as.numeric表现得像，则可以创建一个新功能，如

As.Numeric<-function(x) as.numeric(gsub(" ", "", x, fixed=T))

以获得

As.Numeric("4 57")
# [1] 457

从文本到数字的转换可能不一致

1 个答案: