I've got a rather large (around 100k observations) data set, similar to this:

```
data <- data.frame(
                 ID = seq(1, 5, 1),
                 Values = c("1,2,3", "4", " ", "4,1,6,5,1,1,6", "0,0"), 
                 stringsAsFactors=F)
data
  ID        Values
1  1         1,2,3
2  2             4
3  3              
4  4 4,1,6,5,1,1,6
5  5           0,0

```

I want to split the Values column by `","` with `NA` for missed cells:

```
ID v1 v2 v3 v4 v5 v6 v7
1  1  2  3  NA NA NA NA
2  4  NA NA NA NA NA NA
3  NA NA NA NA NA NA NA
4  4  1  6  5  1  1  6
5  0  0  NA NA NA NA NA
...

```

Best attempt was `strsplit` + `rbind`:

```
df <- data.frame(do.call(
                        "rbind",
                        strsplit(as.character(data$Values), split = "," , fixed = FALSE)
                        ))

```

But `rbind` function just recycles all 'short' rows instead to set an "NA".
[Have found similar problem](https://stackoverflow.com/questions/21124838/split-thousands-of-columns-at-a-time-by-on-multiple-lines-sort-the-values-i)

Many thanks, Leo