Question

我想使用来自craigr包的漂亮功能租赁来提取多个城市和地区的租赁列表中的api数据。如果将城市名称放在引号中作为位置参数（请参阅下面的代码）并添加区域名称的第二个参数，它将返回该区域中的一些最新列表。例如，下面的代码将从losangeles的lac区域返回最新的100个区域作为数据帧。

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

area =“all”的默认参数。这将返回该城市的所有邻居列表。因此，如果我通过如下所示的城市循环，我将获得每个城市的数据框列表。

    CityList <- c("losangeles","chicago").
DataPull.df <- lapply(CityList,function(x){craigr::rentals(location = x, area = "all", max_results = 100) })

我想要做的是创建一个包含两列城市（位置）和区域（区域）的数据框，将每列传递到函数租用中的相应参数，并获取一个数据帧作为回报，以传递给每个城市和区域。出租功能。在下面的示例中，我想要三个LA的三个区域的数据帧。

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

以下代码产生错误，因为我不明白如何将这些参数传递给apply函数，但希望这个问题很好理解。谢谢你的帮助。如何将数据帧的列作为带引号的字符串作为函数的参数传递？

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

如何将数据框的列作为参数传递给for循环中的函数或应用函数

0 个答案: