2017-08-16 65 views

回答

0

这是从GitHub拉:

url <- "https://archive.ics.uci.edu/ml/machine-learning-databases/statlog/german/german.data" 
col.names <- c(
'Status of existing checking account', 'Duration in month', 'Credit history' 
, 'Purpose', 'Credit amount', 'Savings account/bonds' 
, 'Employment years', 'Installment rate in percentage of disposable income' 
, 'Personal status and sex', 'Other debtors/guarantors', 'Present residence since' 
, 'Property', 'Age in years', 'Other installment plans', 'Housing', 'Number of  existing credits at this bank' 
, 'Job', 'Number of people being liable to provide maintenance for', 'Telephone',   'Foreign worker', 'Status' 
) 

data <- read.csv(
url 
, header=FALSE 
, sep=' ' 
, col.names=col.names 
)