diff --git a/R/predl_chrome_for_testing.R b/R/predl_chrome_for_testing.R index a21f814..4814ef0 100644 --- a/R/predl_chrome_for_testing.R +++ b/R/predl_chrome_for_testing.R @@ -36,6 +36,7 @@ predl_chrome_for_testing <- function(url, platform, history, } } extracted <- do.call(rbind, lapply(ver_data, unwrap)) + print(extracted) app_links <- tapply(extracted, extracted$platform, identity) has_platform <- vapply( names(app_links),