Я пытаюсь создать набор данных по корпоративным облигациям, который содержит ежемесячный рейтинг облигаций каждой облигации с даты ее первоначального выпуска до сентября 2019 года с учетом изменений рейтинга облигаций, произошедших в течение периода.
У меня естьтри набора данных.
Тот, который я должен заполнить, содержит идентификатор облигации и идентификатор месяца для каждой связи в моем наборе данных и для каждого месяца, в котором существует каждая связь.
Набор данных 1
'data.frame': 11120 obs. of 5 variables:
$ issue_id: num 587749 587751 587753 590769 590849 ...
$ date : chr "201302" "201302" "201302" "201302" ...
$ FR : chr "0" "0" "0" "0" ...
$ MR : chr "0" "0" "0" "0" ...
$ SPR : chr "0" "0" "0" "0" ...
Набор данных исходного рейтинга облигаций при выпуске, содержащий дату выпуска и соответствующий рейтинг для каждой облигации.
Набор данных 2
'data.frame': 139 obs. of 5 variables:
$ issue_id: num 587749 587751 587753 590769 590849 ...
$ date : chr "201301" "201301" "201301" "201303" ...
$ FR : chr "NR" "NR" "NR" "A+" ...
$ MR : chr "NR" "A1" "NR" "Aa3" ...
$ SPR : chr "NR" "A" "NR" "A" ...
Набор данных об изменении рейтинга облигаций, содержащий дату изменения рейтинга для каждой облигации, а также соответствующий новый рейтинг (ы).
Набор данных 3
'data.frame': 559 obs. of 5 variables:
$ issue_id: chr "587749" "587749" "587749" "587751" ...
$ date : chr "201301" "201412" "201509" "201301" ...
$ FR : chr "0" "0" "0" "0" ...
$ MR : chr "Aa3" "A1" "0" "Aa3" ...
$ SPR : chr "A+" "0" "A" "A+" ...
У меня много проблем с пониманием, как поступить. Я попытался запустить цикл for, содержащий операторы if, но не смог разработать ничего связного. Я также не нашел в Интернете ничего, что я мог бы использовать для разработки своего кода.