fix detectNA() function