Ошибка в if

[nickleb]

Здравствуйте. Что не так? Кто подскажет?

Код: Выделить всё

library(rvest)
library(stringr)
url <- "http://wdc.aari.ru/datasets/atlas/ecimo/chukchi/Fields/TEM/"
webpage <- read_html(url)
tbl <- html_node(webpage, "table")
Df <- as.data.frame(html_table(tbl))
NRows <- nrow(Df)
for (i in 1:NRows)
{
	CurNameFile <- Df[i,'Name']
	class(CurNameFile)
	YesPoint <- str_detect(CurNameFile,".PNG")
	print(YesPoint)
	if(YesPoint)
	{
		print(CurNameFile) 	
	}
}

Ошибка в if (YesPoint) { : пропущенное значение, а нужно TRUE/FALSE

[gamm]

код не работает. Приведите код, который работает после загрузки "чистого" R 3.2. И как минимум вывод str(YesPoint)

[nickleb]

код не работает. Приведите код, который работает после загрузки "чистого" R 3.2. И как минимум вывод str(YesPoint)

в 3.1.2 у меня под Wind'ами работает...

код:

Код: Выделить всё

print("================")	
print(str(YesPoint))
print("================")	

даёт:
[1] "================"
logi NA
NULL
[1] "================"

gamm, как обрабатывть в R ошибки исполнения? - м.б. дадите ссылку какую "для солдат, матросов, сержантов и старшин"

[gamm]

gamm, как обрабатывть в R ошибки исполнения?

не нужно их допускать

ваша ситуация воспроизводится print(str(str_detect(NA,".PNG")))
похоже, у вас CurNameFile=NA. Проверяйте перед использованием, и все.