抖音是近些年最火爆的短视频平台，今天我们试着用R语言编写一个采集大人数据的程序，必须保证安装rvest和proxyr，一起来看看吧。

```r
install.packages("rvest")
install.packages("proxyr")
```

然后，你需要在R中声明代理信息。这可以通过`proxyr::proxy`函数完成。

```r
library(proxycyr)
proxy <- proxyr::proxy(proxy_host = "https://www.duoip.cn/get_proxy", proxy_port = 8000)
```

接下来，你可以使用`rvest`包中的`read_html`函数来抓取网页内容。你需要将网页URL替换为你的目标网页URL。

```r
library(rvest)
url <- "https://www.toutiao.com/c/user/"
webpage <- read_html(url, proxy = proxy)
```

现在你可以开始抓取网页内容了。你可以使用`html_nodes`函数来选择你想要抓取的元素，然后使用`html_text`函数来获取这些元素的文本内容。

```r
users <- webpage %>% html_nodes(".user-stat") %>% html_text()
```

最后，你可以将抓取的数据保存到一个文件中，或者进一步分析。

```r
write.csv(users, "users.csv")
```

以上就是使用R语言编写一个简单的抖音达人数据抓取爬虫程序的步骤。请注意，这只是一个非常基础的示例，实际的爬虫程序可能需要处理更复杂的情况，例如反爬虫机制、登录验证等。在进行任何网络爬虫活动之前，你都应该确保你的行为符合网站的服务条款和法律法规。