如何计算行中的数值

我有一个这样的数据框

df <- as.data.frame(read.table(text =
                    "Human_Gene_Name    Human    Mouse    Chicken    Worm
                  Gene_1    8.5    7.0    NA    5.0
                  Gene_2    5.5    NA    NA    NA", header  = T))

我需要计算每行中数值的数量,然后用该值向数据框中添加一个额外的列。所以对于基因1来说是3,对于基因2来说是1。