如何将数据帧列作为参数传递给for循环或apply函数中的函数

我想使用craigr软件包中一个名为rentals的漂亮函数，从多个城市和地区的租赁清单中提取api数据。 如果将城市名称作为位置参数（请参见下面的代码）放在引号中，并且添加了区域名称的第二个参数，则它将返回该地区最近的一些列表。 例如，下面的代码将以数据帧的形式返回洛杉矶lac地区最近的100个地区

    Billy<-craigr::rentals(location = "losangeles", area = "lac", max_results = 100)

---

Billy
lappy（seq（nrow（passdata）），function（x）craigr:：rentals（location=passdata[x，1]，area=rownames（passdata）[x]，max_results=100）
mappy（function（x，y）craigr:：rentals（location=x，area=y，max_results=100），locations，area）

非常感谢亚当。你解决了我的问题！！

lappy（seq）（nrow）
（passdata）），函数（x）craigr:：rentals（location=passdata[x，1]，area=rownames（passdata）[x]，max_results=100）
或者，
mapply（函数（x，y）craigr:：rentals（location=x，area=y，max_results=100），locations，area）
非常感谢亚当。你解决了我的问题！！
    CityList <- c("losangeles","chicago").
DataPull.df <- lapply(CityList,function(x){craigr::rentals(location = x, area = "all", max_results = 100) })

    locations <-c("losangeles","losangeles","losangeles")
    area <-c("wst","sfv","lac")
    passdata<- as.data.frame(locations,area)

    FinalDataPull.df <- lapply(passdata,function(x){craigr::rentals(location = x[1], area = x[2], max_results = 100) })