r elimina los valores INF
df <- df[!is.infinite(rowSums(df)),]
Arno Deceuninck
df <- df[!is.infinite(rowSums(df)),]