R update if statement to add count

I'm trying to count how columns contain text per row. I have the following that tells me if all columns contain text:

df = structure(list(Participant = 1:3, A = c("char", "foo", ""), B = c("char2", 0L, 0L)), .Names = c("Participant", "A", "B"), row.names = c(NA,                                                                                                                        -3L), class = "data.frame")

 df$newcolumn <- ifelse(nchar(df$A)>1 & nchar(df$B)>1, "yes", "no")

Instead of "Yes" or "No" I want a count of how many matches occur. Ideas?