Funktioniert das R-ichtig? (2)
Eine mögliche Implementierung der Funktion interpret()
ist schon für dich bereitgestellt. In dieser Übung schreibst du eine weitere Funktion, die mithilfe von interpret()
alle Daten aus einem Vektor mit deinen täglichen Profilaufrufen interpretiert. Außerdem gibt diese Funktion bei Bedarf die Summe der Profilaufrufe an betriebsamen Tagen zurück. Eine for
-Schleife ist ideal, um über alle Vektorelemente zu iterieren. Die Rückgabe der Summe aller Profilaufrufe an bestimmten Tagen kannst du über ein Funktionsargument mit einem Standardwert programmieren.
Diese Übung ist Teil des Kurses
R für Fortgeschrittene
Anleitung zur Übung
Vervollständige die Vorlage für die Funktion interpret_all()
:
return_sum
soll ein optionales Argument mit dem StandardwertTRUE
sein.Iteriere innerhalb der
for
-Schleife überviews
und addiere bei jeder Iteration das Ergebnis voninterpret(v)
zucount
. Denke daran, dassinterpret(v)
an betriebsamen Tagenv
und ansonsten0
zurückgibt. Zudem liefertinterpret(v)
einige Textausgaben.Vervollständige das
if
-Konstrukt:Wird
return_sum
alsTRUE
ausgewertet, wirdcount
zurückgegeben.Andernfalls wird
NULL
zurückgegeben.
Rufe diese neu definierte Funktion sowohl mit linkedin
als auch mit facebook
auf.
Interaktive Übung zum Anfassen
Probieren Sie diese Übung aus, indem Sie diesen Beispielcode ausführen.
# The linkedin and facebook vectors have already been created for you
linkedin <- c(16, 9, 13, 5, 2, 17, 14)
facebook <- c(17, 7, 5, 16, 8, 13, 14)
# The interpret() can be used inside interpret_all()
interpret <- function(num_views) {
if (num_views > 15) {
print("You're popular!")
return(num_views)
} else {
print("Try to be more visible!")
return(0)
}
}
# Define the interpret_all() function
# views: vector with data to interpret
# return_sum: return total number of views on popular days?
interpret_all <- function(views, return_sum) {
count <- 0
for (v in views) {
}
if (return_sum) {
} else {
}
}
# Call the interpret_all() function on both linkedin and facebook