length chart != color/style/ref

[JanMarvin]

Not every file as matching charts, colors, style and rels. Need to sort this and read and write the files available. Otherwise we can not read the file at all. For the meantime wb_load(..., data_only = TRUE) is a workaround.

openxlsx2/R/wb_load.R

Lines 486 to 491 in 06a40c6

	for (crt in seq_along(chartsXML)) {
	charts$chart[crt] <- read_xml(chartsXML[crt], pointer = FALSE)
	charts$colors[crt] <- read_xml(chartsXML_colors[crt], pointer = FALSE)
	charts$style[crt] <- read_xml(chartsXML_styles[crt], pointer = FALSE)
	charts$rels[crt] <- read_xml(chartsRels[crt], pointer = FALSE)
	}