2013-11-15 2 views
0

Я был наткнулся на часть вопроса.R: подсчет числа заданной категории, если условие удовлетворяет

id <-1:6 
    age <- c(18,20,19,23,26,24) 
    gender <- c("M","M","F","F","M","F") 
    gpa <- c(3.2,2.5,2.7,3.7,4.1,3.6) 
    score <- c(570,530,550,650,690,640) 

    data <- data.frame(id=id,gender=gender,gpa=gpa,ceescore=score) 

    data$class <- with(data,ifelse(gpa>3.5,"First Class", 
          ifelse(gpa>=2.5 & gpa<=3.5,"Second class", 
          ifelse(gpa<2.5,"Third class",NA)))) 

    data$final_score <- with(data,ifelse(gpa>3,ceescore*gpa,ceescore*gpa*0.8)) 

    data$success <- with(data,ifelse(final_score>2000,1,0)) 

Теперь я должен подсчитать количество самок (в гендерном F для женского пола), которые являются успешными (успех == 1)

я не мог в состоянии управлять им.

Спасибо заранее.

ответ

1
with(data, sum(gender == "F" & success)) 

будет делать трюк.

Смежные вопросы