С против lapply - почему это не работает здесь?

Question

Я пытаюсь изучить R и не могу понять, когда использовать с соответствующим образом. Я думал об этом примере:

Цель состоит в том, чтобы преобразовать «dstr» и «умер» во всем «штрихе» данных (в базе данных ISwR) в формат даты несколькими способами (только для практики). Я сумел сделать это следующим образом:

#applying a function to the whole data frame - use the fact that data frames are lists actually 
rawstroke=read.csv2(system.file("rawdata","stroke.csv",package="ISwR"),na.strings=".") 
names(rawstroke)=tolower(names(rawstroke)) 
ix=c("dstr","died") 
rawstroke[ix]=lapply(rawstroke[ix],as.Date,format="%d.%m.%Y") 
head(rawstroke) 

Однако, когда я пытаюсь использования с функцией он не дает кадр данных в качестве вывода, но пишет только определение функции myfun. Вот код, который я пробовал.

myfun=function(x) 
{y=as.Date(x,format="%d.%m.%Y") 
return(y)} 
rawstroke=read.csv2(system.file("rawdata","stroke.csv",package="ISwR"),na.strings=".") 
names(rawstroke)=tolower(names(rawstroke)) 
ix=c("dstr","died") 
bla=with(rawstroke[ix],myfun) 
head(bla) 

Если кто-то может помочь мне в этом, было бы здорово.

Answer 1

Да, это не похоже на работу для with. Чтобы использовать функцию здесь, вы бы просто заменить as.Date в первом коде с myfun и удалите параметр формата, как

rawstroke[ix]=lapply(rawstroke[ix], myfun) 

with используются для более чисто доступа к переменным в кадрах данных и средах. Например, вместо

t.test(dat$x, dat$y) 

вы могли бы сделать

with(dat, t.test(x, y))