After running the following code, can someone tell me if "Gender" is symmetric or assymetric?
Data = read.table("http://archive.ics.uci.edu/ml/machine-learning-databases/credit-screening/crx.data",sep=",", header=FALSE, na.strings="?")
names(Data) <- c("Gender", "Age", "MonthlyExpenses", "MaritalStatus", "HomeStatus", "Occupation", "BankingInstitution", "YearsEmployed", "NoPriorDefault", "Employed", "CreditScore", "DriversLicense", "AccountType", "MonthlyIncome", "AccountBalance", "Approved")
Data$Gender <- as.factor(Data$Gender)
Data$Age <- as.numeric(Data$Age)
Data$MonthlyExpenses <- as.integer(Data$MonthlyExpenses)
Data$MaritalStatus <- as.factor(Data$MaritalStatus)
Data$HomeStatus <- as.factor(Data$HomeStatus)
Data$Occupation <- as.factor(Data$Occupation)
Data$BankingInstitution <- as.factor(Data$BankingInstitution)
Data$YearsEmployed <- as.numeric(Data$YearsEmployed)
Data$NoPriorDefault <- as.factor(Data$NoPriorDefault)
Data$Employed <- as.factor(Data$Employed)
Data$CreditScore <- as.numeric(Data$CreditScore)
Data$DriversLicense <- as.factor(Data$DriversLicense)
Data$AccountType <- as.factor(Data$AccountType)
Data$MonthlyIncome <- as.integer(Data$MonthlyIncome)
Data$AccountBalance <- as.numeric(Data$AccountBalance)
Data$Approved <- as.factor(Data$Approved)