итерации по месяцам в R (lubridate или base R)? - PullRequest
Новая
       10

итерации по месяцам в R (lubridate или base R)?

0 голосов
/ 12 февраля 2019

Привет У меня в настоящее время есть следующая проблема;

Каждый месяц я должен создавать следующий заголовок (который является просто строкой), я ищу более эффективный способ сделать это, вот как работают заголовки

, напримерВот следующие заголовки в месяц - правило простое, оно увеличивает начальный месяц на 1 и каждый последний месяц на 1, но это основано на текущем месяце:

Вот примеры:

месяц октябрь 2018, название = июнь-август

месяц ноябрь 2018, название = июль-сентябрь

месяц декабрь 2018, название = август-октябрь

месяц январь 2019 г., заголовок = сентябрь-ноябрь

Итак, следующий в последовательности будет:

месяц февраль 2019 г., заголовок = октябрь-декабрь

Есть ли способ, которым я могу произвести следующую итерацию в R?без жесткого кодирования, поскольку оно должно правильно увеличиваться

обновление здесь: 

   library(rvest) # for webscraping
library(stringr) # for dealing with strings
library(lubridate) # for dealing with dates
library(tidyverse) # for data cleaning

# Create variables for the current month and year
current_month_number <- lubridate::month(Sys.Date())
current_month_name <- month.name[current_month_number]
current_year <- year(Sys.Date())

Пожалуйста, люди могут видеть, что я пытаюсь автоматизировать последовательность в данный момент, и я не пытаюсьпросто сложите месяцы и вычтите месяцы, между ними есть четкая разница!

1 Ответ

0 голосов
/ 12 февраля 2019

Если я правильно понимаю вопрос, я думаю, что вы могли бы использовать что-то вроде этого: 

paste0(format(Sys.Date() - months(4),"%B"), " to ", (format(Sys.Date() - months(2),"%B")))

На сегодняшний день это приводит к следующему:

с октября по декабрь

И вы можете назначить его, если вам нужно, чтобы он использовался в нескольких местах или чтобы он был более лаконичным.

Используется пакет lubridate.

...