if (FALSE) {
# prepare data for loading
expense <- data.frame(Date = c("2020-06-01",
"2020-06-02"),
UTMSource = c("test_s_1",
"test_s_2"),
Expenses = c(88.12,
92.11),
UTMMedium = c("cpc",
"cpm"),
UTMCampaign = c("camp1",
"camp2"),
UTMTerm = c("term1",
"term2"),
UTMContent = c("cont1",
"cont2"),
Currency = c("RUB",
"RUB"),
Clicks = c(11, 15))
# upload data
rym_upload_expense(
counter = 1111111,
data = expense,
login = 'yandex_login')
# delete data
rym_delete_uploaded_expense(
counter = 1111111,
data = expense,
login = 'yandex_login')
# get list of expense uploadings
loaded <- rym_get_uploadings_expense(
counter = 1111111,
login = 'yandex_login')
}
Run the code above in your browser using DataLab