Guest User

Untitled

a guest
Dec 14th, 2018
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.00 KB | None | 0 0
  1. library(ryandexdirect)
  2. library(foreach)
  3. library(iterators)
  4. library(tidyr)
  5. library(dplyr)
  6.  
  7. my_token <- "******************************"
  8. my_login <- "login_1"
  9.  
  10. campList <- yadirGetCampaignList(Logins = my_login, Token = my_token)
  11.  
  12. FullStat <- yadirGetReport(ReportType = "CUSTOM_REPORT",
  13. DateRangeType = "ALL_TIME",
  14. #DateFrom = NULL,
  15. #DateTo = NULL,
  16. FieldNames = c("Date","AdNetworkType","CampaignId","TargetingLocationId","TargetingLocationName","AdId","CampaignName","AdGroupId","Placement","Ctr","AdGroupName","Criteria","Bounces","BounceRate","AvgCpc","Clicks","Cost"),
  17. FilterList = c("Clicks GREATER_THAN 0"),
  18. IncludeVAT = "NO",
  19. IncludeDiscount = "NO",
  20. Login = my_login,
  21. Token = my_token)
  22.  
  23. AdClicks <- yadirGetReport(ReportType = "CUSTOM_REPORT",
  24. DateRangeType = "ALL_TIME",
  25. #DateFrom = NULL,
  26. #DateTo = NULL,
  27. FieldNames = c("Date","AdId","Clicks"),
  28. FilterList = c("Clicks GREATER_THAN 0"),
  29. IncludeVAT = "NO",
  30. IncludeDiscount = "NO",
  31. Login = my_login,
  32. Token = my_token)
  33.  
  34. my_ads <- yadirGetAds(CampaignIds = campList$Id,
  35. Login = my_login,
  36. Token = my_token)
  37.  
  38. my_login <- "login_2"
  39.  
  40. campList <- yadirGetCampaignList(Logins = my_login, Token = my_token)
  41.  
  42. FullStat2 <- yadirGetReport(ReportType = "CUSTOM_REPORT",
  43. DateRangeType = "ALL_TIME",
  44. #DateFrom = NULL,
  45. #DateTo = NULL,
  46. FieldNames = c("Date","AdNetworkType","CampaignId","TargetingLocationId","TargetingLocationName","AdId","CampaignName","AdGroupId","Placement","Ctr","AdGroupName","Criteria","Bounces","BounceRate","AvgCpc","Clicks","Cost"),
  47. FilterList = c("Clicks GREATER_THAN 0"),
  48. IncludeVAT = "NO",
  49. IncludeDiscount = "NO",
  50. Login = my_login,
  51. Token = my_token)
  52.  
  53.  
  54.  
  55. my_login <- "login_3"
  56.  
  57. campList <- yadirGetCampaignList(Logins = my_login, Token = my_token)
  58.  
  59. FullStat3 <- yadirGetReport(ReportType = "CUSTOM_REPORT",
  60. DateRangeType = "ALL_TIME",
  61. #DateFrom = NULL,
  62. #DateTo = NULL,
  63. FieldNames = c("Date","AdNetworkType","CampaignId","TargetingLocationId","TargetingLocationName","AdId","CampaignName","AdGroupId","Placement","Ctr","AdGroupName","Criteria","Bounces","BounceRate","AvgCpc","Clicks","Cost"),
  64. FilterList = c("Clicks GREATER_THAN 0"),
  65. IncludeVAT = "NO",
  66. IncludeDiscount = "NO",
  67. Login = my_login,
  68. Token = my_token)
  69.  
  70. my_login <- "login_4"
  71.  
  72.  
  73. campList <- yadirGetCampaignList(Logins = my_login, Token = my_token)
  74.  
  75. FullStat4 <- yadirGetReport(ReportType = "CUSTOM_REPORT",
  76. DateRangeType = "ALL_TIME",
  77. #DateFrom = NULL,
  78. #DateTo = NULL,
  79. FieldNames = c("Date","AdNetworkType","CampaignId","TargetingLocationId","TargetingLocationName","AdId","CampaignName","AdGroupId","Placement","Ctr","AdGroupName","Criteria","Bounces","BounceRate","AvgCpc","Clicks","Cost"),
  80. FilterList = c("Clicks GREATER_THAN 0"),
  81. IncludeVAT = "NO",
  82. IncludeDiscount = "NO",
  83. Login = my_login,
  84. Token = my_token)
Add Comment
Please, Sign In to add comment