Title This is small function to output the final data as numerical type

bined_converted_func(converted_data, original_data, scale_numeric = FALSE)

Arguments

converted_data	insert the converted data from the UFT_func
original_data	insert the full original data
scale_numeric	logical. Scale the data if True inserted. Default is False.

Value

a data frame the contain the tranformed data

Examples

X <- data.frame("ID" = as.numeric(c(1,2,3,4)), "Age" = c(21,15,44,14), "Sex" = c("Male", "Male", "Female", "Female" ),
"Name" = c("John","Samer", "Sara", "Carolina"), Smoking = c("Yes","No", "No","Yes"))
uft_x <- UFT_func(Data = X,Seed = 11)
bined_data <- bined_converted_func(converted_data = uft_x, original_data = X, scale_numeric = TRUE)