r语言获取福州市2014-2023年近十年的天气数据代码

在R语言中，获取历史天气数据通常需要利用外部API或者从公开的数据源抓取。由于福州市的官方气象数据不一定直接提供REST API供我们直接下载，我们可能会选择使用`weatherData`、`openweathermap.R`或`httr`等包来访问第三方提供的数据。

以下是一个基本的步骤示例，假设我们可以使用`openweathermap.R`包，但请注意这只是一个模拟示例，实际天气数据获取可能需要注册并获取API密钥：

# 首先，你需要安装必要的包
install.packages("openweathermap.R") # 如果未安装
library(openweathermap.R)

# 获取API密钥（这里只是一个占位符）
api_key <- "your_weather_api_key"

# 定义城市名和起止年份
city_name <- "福州"
start_year <- 2014
end_year <- 2023

# 创建日期范围
dates <- seq(as.Date(paste(start_year, "-01-01", sep = "-")),
             as.Date(paste(end_year, "-12-31", sep = "-")),
             by = "day")

# 函数获取单天天气数据
get_weather_data <- function(date) {
  url <- paste0("http://api.openweathermap.org/data/2.5/weather?",
               "q=", city_name, "&appid=", api_key,
               "&units=metric&mode=json&date=", format(date, "%Y-%m-%d"))
  data <- fromJSON(GET(url)$content)
  return(data$main) # 这里只是返回主信息作为示例，实际可能包含更多天气变量
}

# 对每个日期调用函数并存储结果
weather_data <- lapply(dates, get_weather_data)

# 现在weather_data是一个list，里面包含了对应日期的天气数据
# 你可以进一步处理这个list，例如转化为dataframe方便分析