Sequence missing.

[Dekermanjian]

Hi, I am having an issue where the second sequence is being omitted. For example if the sequence is 1-2-3-4-5, the sequence being shown on the graph is 1-3-4-5. This can also be seen in the baseball example provided here: https://github.com/timelyportfolio/sunburstR/blob/master/inst/examples/example_baseball.Rmd

[timelyportfolio]

@Dekermanjian, I still don't fully understand. Sometimes this might happen if the hierarchy is malformed. The hyphenated path was not robust enough for me, so in 1.0.0 I switched to prioritize a d3r conversion into a proper hierarchy on the R side. If you can provide a reproducible dataset or example, I can demonstrate how to do this way instead. Also, this example might help illustrate this format.

[timelyportfolio]

@Dekermanjian also very small slices < 0.05% will be removed. See #67, but I don't think this is the problem in your case.

[Dekermanjian]

Would it be possible to use the baseball dataset to illustrate how the d3r conversion works. That way I can compare with the older method. I pasted the example into an R markdown file and attached it to this email.

[Dekermanjian]

No, that is not the case for the issue I am having.

[timelyportfolio]

@Dekermanjian, email attachments don't come through on Github issues. Which baseball example? There are a couple in that rmd.

[Dekermanjian]

It is the first example on this page https://github.com/timelyportfolio/sunburstR/blob/master/inst/examples/example_baseball.Rmd On May 30, 2018, at 9:02 PM, timelyportfolio <[email protected]<mailto:[email protected]>> wrote: @Dekermanjian<https://github.com/Dekermanjian>, email attachments don't come through on Github issues. Which baseball example? There are a couple in that rmd. — You are receiving this because you were mentioned. Reply to this email directly, view it on GitHub<#70 (comment)>, or mute the thread<https://github.com/notifications/unsubscribe-auth/Al77aKBcnr9z7jaovCZboqhWRNSG-2FCks5t311LgaJpZM4UUPXc>.

[timelyportfolio]

@Dekermanjian, if I look at the data and the example, the second row shows up...

Here is a messy way to use d3r to build the hierarchy. I am sure there is a better way, but this is what I came up with most quickly :)

library(sunburstR)
library(pitchRx)
library(dplyr)
library(tidyr)
library(d3r)

# get all data from 2016-08-25
dat <- scrape(start = "2016-08-25", end = "2016-08-25")

action <- dat$runner %>%
  group_by(event_num) %>%
  filter(row_number() == 1) %>%
  ungroup() %>%
  select(gameday_link, inning, inning_side, event) %>%
  nest(event) %>%
  mutate(data = lapply(data, function(x) {
    y = t(x)
    colnames(y) <- paste0("index",seq_len(nrow(x)))
    data.frame(y, stringsAsFactors=FALSE)
  }))

bind_rows(action$data) %>%
  group_by_all() %>%
  summarize(count = n()) %>%
  d3_nest(value_cols = "count") %>%
  sunburst(valueField = "count")

[Dekermanjian]

The second method works properly. But for the first hyphenated method for some reason I don’t get the full sequence. Thank you for showing me the second method. I really appreciate the help. Have a nice evening, Jonathan. On May 30, 2018, at 9:46 PM, timelyportfolio <[email protected]<mailto:[email protected]>> wrote: library(sunburstR) library(pitchRx) library(dplyr) library(tidyr) library(d3r) # get all data from 2016-08-25 dat <- scrape(start = "2016-08-25", end = "2016-08-25") action <- dat$runner %>% group_by(event_num) %>% filter(row_number() == 1) %>% ungroup() %>% select(gameday_link, inning, inning_side, event) %>% nest(event) %>% mutate(data = lapply(data, function(x) { y = t(x) colnames(y) <- paste0("index",seq_len(nrow(x))) data.frame(y, stringsAsFactors=FALSE) })) bind_rows(action$data) %>% group_by_all() %>% summarize(count = n()) %>% d3_nest(value_cols = "count") %>% sunburst(valueField = "count")