RSiteCatalyst BuildInnerBreakdownsRecursively Test script

BuildInnerBreakdownsRecursively-test.R

library(devtools)
library(jsonlite)
library("RSiteCatalyst")

text <- '{"report":{"type":"ranked","elements":[{"id":"trackingcode","name":"External Campaign ID (cid)","classification":"Campaign Type"},{"id":"trackingcode","name":"External Campaign ID (cid)","classification":"Campaign Name"}],"reportSuite":{"id":"","name":""},"period":"Mon. 17 Nov. 2014 - Sun. 23 Nov. 2014","metrics":[{"id":"event31","name":"Emails Clicked (ET Total)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event95","name":"Emails Clicked (ET Unique)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event29","name":"Emails Delivered (ET Total)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event30","name":"Emails Opened (ET Total)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event94","name":"Emails Opened (ET Unique)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event38","name":"Emails Sent (ET Total)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event33","name":"Emails Total Bounces (ET Total)","type":"number","decimals":0,"latency":0,"current":false},{"id":"event32","name":"Emails Unsubscribed (ET Total)","type":"number","decimals":0,"latency":0,"current":false}],"segments":[{"id":"53c059aee4b07cd3c4332163","name":"AeM: Non E-Mail Segment (excludes PCP & NoCat) - Royal"}],"data":[{"name":"Tactical","url":"","counts":["319988","218539","10691122","2647880","1971554","10742401","51279","12780"],"breakdown":[{"name":"waveQ4_2014","url":"","counts":["146509","100528","4898105","1051847","800240","4921118","23013","4629"]},{"name":"quantum_initiative2014","url":"","counts":["109903","82631","5129807","1170057","929134","5142061","12254","5125"]},{"name":"Precruise Tactical","url":"","counts":["28343","14230","121739","132981","58114","126420","4681","150"]},{"name":"RC Sales","url":"","counts":["15286","12145","539051","122005","95607","547380","8329","1167"]},{"name":"NovOBC_2014","url":"","counts":["8758","4983","-2887","94882","54929","0","2887","835"]},{"name":"QNselfie_2014","url":"","counts":["5379","2970","-3","40243","19718","0","3","481"]},{"name":"Internal","url":"","counts":["4488","364","4581","4107","663","4668","87","0"]},{"name":"quantum_initiatives2014","url":"","counts":["342","189","0","6309","2628","0","0","87"]},{"name":"Tactical","url":"","counts":["297","112","-10","4071","1340","0","10","38"]},{"name":"OAClassReviteBookedGuest","url":"","counts":["154","73","-1","2917","826","0","1","36"]},{"name":"BOGO_Oct_2014","url":"","counts":["147","102","-2","6128","3247","0","2","114"]},{"name":"Loyalty Tactical","url":"","counts":["71","45","647","1083","403","651","4","0"]},{"name":"Choice_August_2014","url":"","counts":["68","35","-1","2083","858","0","1","21"]},{"name":"Veterans_2014","url":"","counts":["40","17","0","238","79","0","0","2"]},{"name":"eNewsletter","url":"","counts":["34","18","0","667","196","0","0","3"]},{"name":"WOW_Sept2014","url":"","counts":["32","25","-4","2086","1083","0","4","24"]},{"name":"WOW_August2014","url":"","counts":["28","5","0","654","214","0","0","5"]},{"name":"MayBOGOplusOBC_2014","url":"","counts":["12","4","0","248","64","0","0","1"]},{"name":"Offer_July2014","url":"","counts":["10","8","0","605","235","0","0","2"]},{"name":"MayBOGO_2014","url":"","counts":["10","5","-2","311","154","0","2","4"]},{"name":"Offer_August2014","url":"","counts":["10","2","0","404","158","0","0","6"]},{"name":"Weekend_WOW_October2014","url":"","counts":["9","8","-1","629","378","0","1","12"]},{"name":"Casino Royale","url":"","counts":["6","3","103","160","40","103","0","1"]},{"name":"JulyOBC_2014","url":"","counts":["5","5","0","364","156","0","0","4"]},{"name":"BOGOHO_SailFree_June2014","url":"","counts":["5","5","0","358","124","0","0","0"]},{"name":"CASLConfirmation","url":"","counts":["5","2","0","95","25","0","0","0"]},{"name":"Weekend_WOW_August2014","url":"","counts":["4","4","0","298","111","0","0","6"]},{"name":"BogoHO_June2014","url":"","counts":["4","3","0","523","191","0","0","9"]},{"name":"Weekend_WOW_September2014","url":"","counts":["4","3","0","269","127","0","0","3"]},{"name":"NO_OPEN_RC Sales","url":"","counts":["4","3","0","125","58","0","0","1"]},{"name":"Weekend_WOW_July2014","url":"","counts":["4","2","0","132","67","0","0","3"]},{"name":"BH_Free_2014","url":"","counts":["3","2","0","116","57","0","0","2"]},{"name":"Newsletter","url":"","counts":["3","1","0","75","31","0","0","1"]},{"name":"Wow_Sale_June2014","url":"","counts":["2","2","0","275","101","0","0","4"]},{"name":"Offer_August2014 B","url":"","counts":["2","2","0","103","45","0","0","1"]},{"name":"Weekend_WOW_June2014","url":"","counts":["2","1","0","142","64","0","0","0"]},{"name":"Casino Royale VIP Sailings","url":"","counts":["2","1","0","66","7","0","0","0"]},{"name":"ReactivationSeptember","url":"","counts":["1","1","0","5","5","0","0","1"]},{"name":"Casino Loyalty","url":"","counts":["1","0","0","54","1","0","0","0"]},{"name":"OA_Micro_2014","url":"","counts":["1","0","0","15","5","0","0","0"]},{"name":"Choice_August_2014_FAM","url":"","counts":["0","0","0","73","28","0","0","2"]},{"name":"ShortCaribBahamasSale_May2014","url":"","counts":["0","0","0","55","26","0","0","0"]},{"name":"ReactivationAugust","url":"","counts":["0","0","0","22","17","0","0","0"]}]},{"name":"LifeCycle","url":"","counts":["16299","8096","36576","57996","21903","37068","492","106"],"breakdown":[{"name":"Precruise","url":"","counts":["14078","6498","19299","44618","14158","19622","323","17"]},{"name":"Welcome","url":"","counts":["1474","1058","10093","7347","4222","10213","120","56"]},{"name":"Postcruise","url":"","counts":["726","535","6831","5980","3508","6880","49","33"]},{"name":"Internal","url":"","counts":["21","5","353","51","15","353","0","0"]}]},{"name":"Remarketing","url":"","counts":["12769","9230","136142","74748","50283","136678","536","103"],"breakdown":[{"name":"Remarketing Cart Abandonment","url":"","counts":["12769","9230","136141","74747","50282","136677","536","103"]},{"name":"Remarketing Courtesy Hold","url":"","counts":["0","0","1","1","1","1","0","0"]}]},{"name":"Loyalty","url":"","counts":["6651","3410","6960","36238","14384","7107","147","91"],"breakdown":[{"name":"Loyalty Tactical","url":"","counts":["5514","2700","0","29555","11296","0","0","74"]},{"name":"Loyalty Trigger","url":"","counts":["1071","698","6663","6501","3035","6809","146","17"]},{"name":"Internal","url":"","counts":["66","12","297","182","53","298","1","0"]}]}],"totals":["357530","239909","10870901","2828592","2061885","10923355","52454","13123"],"version":"1.4.14.10"},"waitSeconds":"0.987","runSeconds":"3.672"}'

data <- fromJSON(text)

parsed <- ParseRanked(data)
print(parsed)