Как я могу исправить ошибку, возникшую при использовании пакета SPIGA в R

Question

Ошибка в R при запуске пакета SPIGA Привет! Я начал использовать R совсем недавно и в настоящее время использую пакет SPIGA для расчета Стандартизированного индекса осадков (SPI). Я просмотрел файл справки и повторил пример. Работает нормально. Однако, когда я пытаюсь использовать свои данные, я получаю сообщение об ошибке (упомянуто ниже). Код, который я запускаю:

###LOAD DATA
library(readr)
B <- read_csv("C:/Users/pc5/Desktop/B.csv", 
    col_types = cols(Pm_St1 = col_number(), 
        Pm_St2 = col_number(), Pm_St3 = col_number(), 
        Pm_St4 = col_number(), month = col_integer(), 
        year = col_integer()))
View(B)
library(SPIGA)
Pmon<-B
summary(B)
Pmon<-B[,]

###COMPUTING SPI
pob <-50
iMax <-10
SPIGA(Pmon, scale=3, population=pob, maxIter = iMax, plotGA=TRUE, plotCDF=TRUE)

. В этот момент я получаю сообщение об ошибке

Error: Positive column indexes in `[` must match number of columns:
* `.data` has 1 columns
* Position 1 equals 2

Любые предложения относительно что я делаю неправильно.