Рассмотрите возможность создания списка фреймов данных, содержащих минимальные и максимальные значения каждого столбца по всем наборам данных:
# GET LIST OF CSV FILES
csv_files <- list.files(pattern=".csv")
df_list <- lapply(csv_files, function(f) {
df <- read.csv(f)
# BUILD LIST OF MIN AND MAX ACROSS ALL COLUMNS
agg_list <- lapply(df, function(col) c(min(col), max(col)))
# BIND AGGREGATES INTO A DATA FRAME
min_max_df <- do.call(data.frame, agg_list)
# RETURN UPDATE DF WITH TWO NEW COLUMNS
transform(min_max_df, file_name = f, aggregate=c("min", "max"))
})
# CONCATENATE ALL DFs
final_df <- do.call(rbind, df_list)
Создайте свойство DataSource в пользовательском элементе управления, как показано ниже:
public object DataSource
{
get
{
return this.fvJobDetail.DataSource;
}
set
{
this.fvJobDetail.DataSource = value;
}
}
Сделайте то же самое для метода DataBind ().