`print` Methode für ReferenceClass

Ich habe:

MyClass <- setRefClass ("MyClass", fields = list (data = "numeric"))

Initialisieren wir ein Objekt vonMyClass:

OBJ <- MyClass (Daten = 1: 4)

... und auf dem Bildschirm ausdrucken:

OBJ

Reference class object of class "MyClass"
Field "data":
[1] 1 2 3 4

Ich möchte die Art und Weise, wie es gedruckt wird, ändern, so dass ich diese Methode schrieb:

print.MyClass <- function (x) {cat ("Dies ist die gedruckte Darstellung:") print (x $ data)}

Das funktioniert jetzt:

print (OBJ)

This is printed representation: [1] 1 2 3 4

das tut nicht:

OBJ

Gibt es eine Möglichkeit, meine Druckmethode mit nur der Eingabe zu implementierenOBJ?

Ich habe es auch versuchtshow, oder(OBJ), aber keine Liebe für mich.

Antworten auf die Frage(1)

Ihre Antwort auf die Frage