时间戳

首页 > 解决方案 > 导出到 .csv R 后字符发生变化

r - 导出到 .csv R 后字符发生变化

问题描述

在理解为什么这些数字以这种方式导出时存在问题，但在 Rstudio 中它们看起来还不错。我确定这是一个文件格式问题，但我不明白如何检查它是什么以及它正在导出什么以使其更改。

df中的chr 

6½ | -105 | 6½ +105

导出后在 .csv 中

6½ | -105 | 6½ +105

下面的代码：

    library(rvest)
    library(dplyr)
    library(tm)
    library(stringi)
    library(readr)


    tomorrow <- Sys.Date()
    tomorrow <- gsub("-", "", tomorrow, fixed=TRUE)

    print(tomorrow)

    url <- read_html(paste0('https://classic.sportsbookreview.com/betting-odds/nhl-hockey/totals/?date=', as.character(tomorrow)))


    rot <- url %>%
      html_nodes('.eventLine-rotation .eventLine-book-value') %>%
      html_text()

    teams <- url %>%
      html_nodes('.team-name a') %>%
      html_text()

    total <- url %>%
      html_nodes('.adjust')%>%
      html_text()

    opening <- url %>%
      html_nodes('.price') %>%
      html_text()

    pinnacle <- url %>%
      html_nodes('.eventLine-book:nth-child(10) b') %>%
      html_text()

    dimes <- url %>%
      html_nodes('.eventLine-book:nth-child(11) b') %>%
      html_text()

    BookMaker <- url %>%
      html_nodes('.eventLine-book:nth-child(12) b') %>%
      html_text()

    BETONLINE <- url %>%
      html_nodes('.eventLine-book:nth-child(13) b') %>%
      html_text()

    BOVADA <- url %>%
      html_nodes('.eventLine-book:nth-child(14) b') %>%
      html_text()

    HERITAGE <- url %>%
      html_nodes('.eventLine-book:nth-child(15) b') %>%
      html_text()

    roster <- data.frame(ROT = rot, TEAM = teams, Total = total, OPENER = opening, PINNACLE = pinnacle,
                          FiveDimes = dimes, BOVADA = BOVADA, BETONLINE = BETONLINE,
                          HERITAGE = HERITAGE, BookMaker = BookMaker)

    write_delim(roster,'NHL_TOTALS_TODAY.csv', delim = ',')

标签： r

解决方案

我刚刚将您的更改write_delim为write_excel_csv，它在我的 excel 中打开，因为它应该这样做。

我有同样的错误，只需进行该切换。

有点晚了，我知道。祝你好运，好赌。

推荐阅读