** Dataset - FORAYearForecast**

head(FORAYearForecast)

** Add to FORAYeaForecast new columns: lo90, hi90, lo95, hi95, lo80, hi80**

addPoiCI(FORAYearForecast)

addPoiCI(): Эта функция, которую я написал для добавления lo90, hi90, lo95, hi95, lo80, hi80

** This is result of data after using addPoiCI

head(data)
LS0tDQp0aXRsZTogIkRhdGEiDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KKiogRGF0YXNldCAtIEZPUkFZZWFyRm9yZWNhc3QqKg0KYGBge3J9DQpoZWFkKEZPUkFZZWFyRm9yZWNhc3QpDQpgYGAgDQoNCmBgYHtyfQ0KaGVhZChGT1JBWWVhckZvcmVjYXN0KQ0KYGBgDQoqKiBBZGQgdG8gRk9SQVllYUZvcmVjYXN0IG5ldyBjb2x1bW5zOiBsbzkwLCBoaTkwLCBsbzk1LCBoaTk1LCBsbzgwLCBoaTgwKioNCmBgYHtyfQ0KYWRkUG9pQ0koRk9SQVllYXJGb3JlY2FzdCkNCmBgYA0KDQphZGRQb2lDSSgpOiDQrdGC0LAg0YTRg9C90LrRhtC40Y8sINC60L7RgtC+0YDRg9GOINGPINC90LDQv9C40YHQsNC7INC00LvRjyDQtNC+0LHQsNCy0LvQtdC90LjRjyBsbzkwLCBoaTkwLCBsbzk1LCBoaTk1LCBsbzgwLCBoaTgwDQoNCioqIFRoaXMgaXMgcmVzdWx0IG9mIGRhdGEgYWZ0ZXIgdXNpbmcgYWRkUG9pQ0kNCmBgYHtyfQ0KaGVhZChkYXRhKQ0KYGBgDQoNCmBgYHtyfQ0KaGVhZChkYXRhKQ0KYGBgDQo=