Πώς να μειώσετε τον αριθμό γραμμών σε R-dummies

Κατά τη μετατροπή του σεναρίου σε R, δεν απαιτούνται όλα τα στοιχεία. Στην πραγματικότητα, η δήλωση επιστροφής () είναι προαιρετική, επειδή, από προεπιλογή, το R θα επιστρέφει πάντοτε την τιμή της τελευταίας γραμμής κώδικα στο σώμα των λειτουργιών.

Οι τιμές επιστροφής από προεπιλογή

Ας υποθέσουμε ότι ξεχάσατε να προσθέσετε επιστροφή (αποτέλεσμα) στη συνάρτηση addPercent (). Τι θα συμβεί τότε; Μπορείτε να μάθετε εάν διαγράφετε την τελευταία γραμμή της συνάρτησης addPercent (), αποθηκεύστε το αρχείο και πηγή του ξανά για να το φορτώσετε στο χώρο εργασίας.

Οποιεσδήποτε αλλαγές κάνετε σε κάποια λειτουργία θα ισχύσουν μόνο αφού στείλετε τον προσαρμοσμένο κώδικα στην κονσόλα. Αυτό θα αντικαταστήσει αποτελεσματικά το παλιό αντικείμενο λειτουργίας από ένα νέο.

Αν προσπαθήσετε πάλι addPercent (νέοι αριθμοί), βλέπετε … τίποτα. Προφανώς, η λειτουργία δεν κάνει τίποτα άλλο - αλλά αυτή είναι μια ψευδαίσθηση, όπως μπορείτε να δείτε με τον ακόλουθο κώδικα: >> print (addPercent (νέοι αριθμοί)) [1] "82. 2%" "2 Σε αυτή την περίπτωση, η τελευταία γραμμή της συνάρτησης επιστρέφει την τιμή του αποτελέσματος

αόρατα,

και αυτός είναι ο λόγος που το βλέπετε μόνο αν ζητάτε συγκεκριμένα τύπωσε το. Η τιμή επιστρέφεται αόρατα λόγω της εκχώρησης στην τελευταία γραμμή. Επειδή αυτό δεν είναι πραγματικά πρακτικό, μπορείτε να αποθέσετε την εργασία στην τελευταία γραμμή και να αλλάξετε τον κωδικό λειτουργίας στα εξής:

addPercent <- συνάρτηση (x) {ποσοστό <- στρογγυλό (x * 100, digits = 1) () είναι εντελώς άχρηστο, αλλά πραγματικά το χρειάζεστε εάν θέλετε να βγείτε από τη λειτουργία πριν το τέλος του κώδικα στο σώμα.Για παράδειγμα, θα μπορούσατε να προσθέσετε μια γραμμή στη συνάρτηση addPercent που ελέγχει αν το x είναι αριθμητικό και αν όχι, επιστρέφει το NULL, όπως αυτό:

addPercent <- (x) {if (! (9)> Οι τοίχοι

Οι όνυχες, {}, οι αριθμοί, οι αριθμοί, οι αριθμοί (x) να σχηματίσετε τον παροιμιώδη τοίχο γύρω από τη λειτουργία, αλλά σε ορισμένες περιπτώσεις μπορείτε να τα αφήσετε επίσης. Ας υποθέσουμε ότι θέλετε να υπολογίσετε τις αποδόσεις από ένα ποσοστό. Οι πιθανότητες να συμβεί κάτι δεν είναι τίποτα περισσότερο από την πιθανότητα να συμβεί διαιρεμένη από την πιθανότητα να μην συμβεί. Έτσι, για να υπολογίσετε τις αποδόσεις, μπορείτε να γράψετε μια λειτουργία όπως αυτή:

> αποδόσεις <- συνάρτηση (x) x / (1-x)

Ακόμα και χωρίς την πρόταση braces ή return (): >> αποδόσεις (0, 8) [1] 4

Αν μια συνάρτηση αποτελείται από μία μόνο γραμμή κώδικα, μπορείτε απλά να προσθέσετε αυτή τη γραμμή μετά τη λίστα των παραδειγμάτων χωρίς να την περικλείσετε σε τιράντες.R θα δει τον κώδικα μετά τη λίστα των παραδειγμάτων ως το σώμα της συνάρτησης.

Θα μπορούσατε να κάνετε το ίδιο με τη συνάρτηση addPercent () τοποθετώντας τα πάντα έτσι: >> addPercent <- λειτουργία (x) πάστα (στρογγυλή (x * 100, digits = 1) ")

Αυτό είναι ένα πονηρό σχέδιο για να δώσει στον επόμενο άνθρωπο που διαβάζει αυτόν τον κώδικα έναν σοβαρό πονοκέφαλο. Είναι λίγο λιγότερο από ένα πονηρό σχέδιο εάν το επόμενο πρόσωπο είναι εσύ, όμως, και οι πιθανότητες είναι, θα είναι. ο χώρος σε ένα σώμα λειτουργιών είναι πολύ λιγότερο σημαντικός από το να διατηρείτε τον κωδικό αναγνώσιμο, επειδή η εξοικονόμηση χώρου δεν σας κερδίζει τίποτα.Κατασκευές όπως η λειτουργία αποδόσεων είναι χρήσιμες μόνο σε πολύ συγκεκριμένες περιπτώσεις