What type of person are you?
There are 10 questions. For each question, select one choice that best describes you. You must answer at least 5 questions for the program to analyze your personality. For the best result, you are encouraged to answer all 10 questions.
Based on your answers, the program will match you with one of 4 personality types. The program will show you the personality type that reveals the most accurate picture of your natural inclinations. While the result might not 100% accurately describes you, it's a very good predictor of how you will naturally respond in most situations.
Type A: Fast-paced, task oriented.
Type B: Fast-paced, people oriented
Type C: Slow-paced, people oriented
Type D: Slow-paced, task oriented
You can read more about your type when you see the result.
# Input, results from 10 questions
input <- c("A","B","A","E","C","A","A","D","A","A")
ans <- c(0,0,0,0,0) # initialize vector of answers
for (i in 1:10) {
ans <- calc(input[i],ans)
# calc function is hidden to fit on this slide
}
# Vector of answers after calculation
ans
## [1] 6 1 1 1 1