Расчет индекса SPI из RStudio