r - 列名称中插入了句点，应该有空格

Question

在由ggplot生成的图中，沿x轴的每个标签都是一个字符串，即“1990年的产品”。但是，生成的图在每个单词之间都有一个句点。换句话说，以上字符串显示为“the.product.in.1990”

如何确保以上“。”没有添加？

以下代码是我用来沿x轴的每个点添加字符串的代码

last_plot()+scale_x_discrete(limits=ddata$labels$text)

样例代码:

library(ggdendro)
x <- read.csv("test.csv",header=TRUE) 
d <- as.dist(x,diag=FALSE,upper=FALSE) 
hc <- hclust(d,"ave") 
dhc <- as.dendrogram(hc) 
ddata <- dendro_data(dhc,type="rectangle")
ggplot(segment(ddata)) + geom_segment(aes(x=x0,y=y0,xend=x1,yend=y1))
last_plot() + scale_x_discrete(limits=ddata$labels$text)

ddata$labels$text的每一行都是一个字符串，例如“1990年的产品”。
我想在生成的图中保留相同的格式，而不是“the.product.in.1990”

Answer 1

出现问题是因为您试图读取列名包含空格的数据。

当您使用read.csv读取此数据时，这些列名称将转换为语法上有效的R名称。这是说明问题的示例:

some.file <- '
    "Col heading A", "Col heading B"
    A, 1
    B, 2
    C, 3
    '

使用默认的read.csv设置进行阅读:

> x1 <- read.csv(text=some.file)
> x1
  Col.heading.A Col.heading.B
1             A             1
2             B             2
3             C             3
4                          NA
> names(x1)
[1] "Col.heading.A" "Col.heading.B"

为了避免这种情况，请使用参数check.names=FALSE:

> x2 <- read.csv(text=some.file, check.names=FALSE)
> x2
  Col heading A Col heading B
1             A             1
2             B             2
3             C             3
4                          NA
> names(x2)
[1] "Col heading A" "Col heading B"

现在，剩下的问题是列名不能包含空格。因此，要引用这些列，您需要将您的列名称包装在反引号中:

> x2$`Col heading A`
[1]     A     B     C      
Levels:          A     B     C

有关更多信息，请参见?read.csv，尤其是check.names的信息。
?Quotes中还有一些关于反引号的信息