איזו פונקציה ב-R מחזירה את טיפוס האובייקט?