library(lubridate)
date1 = "1 April 1977"
date2 = "7 July 2017"
date1 = dmy(date1)
date2 = dmy(date2)
number_of_months = (year(date1) - year(date2)) * 12 + month(date1) - month(date2)
Разница в месяцах = 12 * разница в годах + разница в месяцах.
Следующее может потребоваться исправить с помощью условия
blockquote>ifelse
для вычитания месяца
вы можете прочитать файл и сделать матрицу из 2xno_cities, а когда пользователь вводит число, вы просто делаете
array[input-given-by-user][1]
, так как первый [] будет для строки, а второй для столбца, где вы сохраняете города,