Цель ractivecampaign
упростить процесс запроса данных из ActiveCampaign API в R. На данный момент в ractivecampaign
присутвует 16 функций:
ac_auth()
- Авторизацияac_get_accounts()
- Список доступных аккаунтовac_get_custom_account_fields_values()
- Значения пользовательских полей аккаунтовac_get_custom_account_fields()
- Список пользовательских полей аккаунтаac_get_deals()
- Список сделокac_get_custom_deal_fields_values()
- Значения пользовательских полей сделокac_get_custom_deal_fields()
- Список пользовательских полей сделокac_get_deal_piplines()
- Список групп этапов сделокac_get_deal_stages()
- Список этапов сделокac_get_deal_activities()
- Список активностей по сделкеac_get_users()
- Список пользователейac_get_tags()
- Получить список всех созданных теговac_get_contacts()
- Список контактовac_get_custom_contact_fields_values()
- Значения пользовательских полей контактовac_get_custom_contact_fields()
- Список пользовательских полей этаповac_get_contact_tags
- Получить теги определённых контактов.ac_get_campaigns()
- Список кампанийac_get_campaigns_aggregate_revenues()
- Дохход по кампаниямac_get_campaigns_messages()
- Список сообщений кампанийac_get_messages()
- Список всех сообщенийНа данный момент пакет доступн для установки из GitHub:
# install.packages("ractivecampaign")
install.packages("devtools")
devtools::install_github('selesnow/ractivecampaign')
Для авторизации вам необходимо найти в аккаунте URL и Ключ API, для этого перейдите в основном меню перейдите в Settings > Developer, там вы найдёте нужные данные.
library(ractivecampaign)
library(ggplot2)
# auth
ac_auth(url = 'Ваш API URL', key = 'Ваш API Key')
# get deals
deals <- ac_get_deals()
# analyze
deals %>%
mutate(date = as.Date(cdate)) %>%
group_by(date) %>%
summarise(deals = n_distinct(id)) %>%
ggplot( aes(date, deals) ) +
geom_line() + geom_point() +
labs(title = 'Deals by date from ActiveCampaign')
Алексей Селезнёв, Head of analytics dept. at Netpeak
Telegram Channel: @R4marketing
Youtube Channel: R4marketing
email: selesnow@gmail.com
Telegram: @AlexeySeleznev
facebook: facebook.com/selesnow
blog: alexeyseleznev.wordpress.com