2017-07-11 1 views

Antwort

1

Sie können die entsprechenden function erstellen, dann apply es zu einem Vektor, dann sum() auf das Ergebnis verwenden.

EDIT: oder nur n*ln(a/b) + sum((-((xi-c)/b)^a+(a-1)*ln((Xi-c)/b)))

+2

Es besteht keine Notwendigkeit für eine lapply Schleife. Dies kann leicht vollständig vektorisiert erfolgen. – Roland

+1

@Roland Ich neige dazu zu vergessen, R ist so großartig von einer Sprache. Ich habe es repariert, danke! –

Verwandte Themen