Question

我的问题与here中的问题类似，但我在实现答案时遇到问题，我无法在该帖子中发表评论。

所以，我有一个包含嵌套数据的大型CSV文件，其中包含由空格分隔的2列（比如第一列是Y，第二列是X）。列X本身也是逗号分隔值。

21.66 2.643227,1.2698358,2.6338573,1.8812188,3.8708665,...
35.15 3.422151,-0.59515584,2.4994135,-0.19701914,4.0771823,...
15.22 2.8302398,1.9080592,-0.68780196,3.1878228,4.6600842,...
...

我想使用sparklyr将此CSV读入2个不同的Spark表。

到目前为止，这就是我一直在做的事情：

使用spark_read_csv将所有CSV内容导入Spark数据表

df = spark_read_csv(sc, path = "path", name = "simData", delimiter = " ", header = "false", infer_schema = "false")

结果是一个名为simData的Spark表，其中有两列：C0和C1
使用dplyr选择第一个＆amp;第二列，然后将它们分别注册为名为Y和X的新表

simY <- df %>% select(C0) %>% sdf_register("simY")

simX <- df %>% select(C1) %>% sdf_register("simX")
使用simX函数拆分ft_regex_tokenizer中的值，并考虑here中写的答案。

ft_regex_tokenizer(input_DF, input.col = "COL", output.col = "ResultCols", pattern = '\\###')

但是当我尝试head时使用dplyr：

Source:   query [6 x 1]
Database: spark connection master=yarn-client app=sparklyr local=FALSE

        Result
        <list>
1 <list [789]>
2 <list [789]>
3 <list [789]>
4 <list [789]>
5 <list [789]>
6 <list [789]>

我想将其转换为新的Spark表并将类型转换为double。有没有办法做到这一点？我已考虑将数据collect转换为R（使用dplyr），转换为矩阵，然后为每行执行strsplit，但我认为这不是解决方案，因为CSV大小可以达到40GB。

编辑：Spark版本是1.6.0

Answer 1

让我们说你的数据看起来像这样

library(dplyr)
library(sparklyr)

df <- data.frame(text = c("1.0,2.0,3.0", "4.0,5.0,6.0"))
sdf <- copy_to(sc, df, "df", overwrite = TRUE)

并且您已经创建了spark_connection，您可以执行以下操作

n <- 3

# There is no function syntax for array access in Hive
# so we have to build [] expressions
# CAST(... AS double) could be handled in sparklyr / dplyr with as.numeric
exprs <- lapply(
  0:(n - 1), 
  function(i) paste("CAST(bits[", i, "] AS double) AS x", i, sep=""))

sdf %>%
  # Convert to Spark DataFrame
  spark_dataframe() %>% 
  # Use expression with split and explode
  invoke("selectExpr", list("split(text, ',') AS  bits")) %>%
  # Select individual columns
  invoke("selectExpr", exprs) %>%
  # Register table in the metastore ("registerTempTable" in Spark 1.x)
  invoke("createOrReplaceTempView", "exploded_df")

使用dplyr::tbl取回sparklyr对象：

tbl(sc, "exploded_df")

Source:   query [2 x 3]
Database: spark connection master=local[8] app=sparklyr local=TRUE

     x0    x1    x2
  <dbl> <dbl> <dbl>
1     1     2     3
2     4     5     6

在最新版本中，您还可以使用sdf_separate_column：

sdf %>% 
  mutate(text=split(text, ",")) %>% 
  sdf_separate_column("text", paste0("x", 0:2))

# Source:   table<sparklyr_tmp_87125f13b89> [?? x 4]
# Database: spark_connection
  text       x0    x1    x2   
  <list>     <chr> <chr> <chr>
1 <list [3]> 1.0   2.0   3.0  
2 <list [3]> 4.0   5.0   6.0

Sparklyr：如何将列表列分解为Spark表中自己的列？

1 个答案: