Wie die addPercent Funktion in R to adapt

Angenommen, Sie das Prozentzeichen in Zeichenvektoren einfügen mit der Lage sein wollen addPercent Funktion. Ein Zeichen Vektor wird ein Fehler in dem Moment geben Sie versuchen, es zu vermehren, so müssen Sie eine andere Funktion für das, wie die folgenden:

addPercent.character lt; - Funktion (x) {Paste (x, "%", sep = "")}

Beachten Sie, dass der Typ des Objekts nicht Vektor ist aber Charakter. In gleicher Weise müssen Sie auch das Original umbenennen addPercent Funktion addPercent.numeric in Ihrem Skript.

Wenn Sie das System von Verfahren Disposition verwenden, können Sie alle Funktionen in einer Skriptdatei zu halten, wenn sie nicht zu groß sind. Auf diese Weise müssen Sie nur eine Skriptdatei, um Quelle die gesamte generische System zum Laufen zu haben.

Alles, was Sie jetzt brauchen, ist ein generisches addPercent () funktioniert wie folgt aus:

addPercent lt; - Funktion (x, ...) {UseMethod ( "addPercent")}

Sie verwenden nur zwei Argumente hier: x und die Punkte (...). Die Verwendung der Punkte Argument stellt sicher, Sie können immer noch alle Argumente aus der Nutzung addPercent.numeric () Funktion in Ihren Anruf addPercent (). Die zusätzlichen Argumente werden einfach auf die entsprechende Methode über die Punkte Argument weitergegeben.

die komplette Script-Datei auf der Konsole Nach der Sendung, können Sie beide Zeichenvektoren und numerische Vektoren senden addPercent (), so was:

> AddPercent (new.numbers, FUN = Boden) [1] "82%" "2%" "162%" "40%"> addPercent (Buchstaben [1: 6]) [1] "a%" "b% "" c% "" d% "" e% "" f% "