创建函数以从R中的数据框中提取值

# 创建函数以从数据框中提取值
extract_values <- function(dataframe, condition) {
  # 使用subset函数筛选数据
  extracted_data <- subset(dataframe, condition)
  
  # 访问特定列并存储结果
  extracted_values <- extracted_data$column_name
  
  # 返回结果
  return(extracted_values)
}

# 使用函数提取值
data <- data.frame(column_name = c("value1", "value2", "value3"), stringsAsFactors = FALSE)
extracted_values <- extract_values(data, condition = column_name == "value2")