2 vprašanji

[mperbil]

Pozdravljeni, zanimata me dve stvari in sicer:

1. zanima me kako bi v tabeli pomnožil le eno vrstico z nekim številom. In sicer bi recimo v tabeli t9 (vizualizacija_moja.r) pomnožil vrstico s prvim stolpcem Germany z 380/340, da bi tako podatke prilagodil drugim ligam, kjer je bilo odigranih 380 tekem.
2. shiny sem naredil tako, da kaže graf, glede na vnešeni x in y, zanima me kako bi se graf prilagodil še glede na državo (da bi jo uporabnik vnesel tako kot x in y) in sicer tako da bi bili na grafu le vratarji ene države. Hvala in lep pozdrav

[timotejvesel]

1. Ena možnost je na primer

   t9[,2] <- ifelse(t9$drzava == 'Germany', t9[,2] * (380/340), t9[,2])
   t9[,3] <- ifelse(t9$drzava == 'Germany', t9[,3] * (380/340), t9[,3])

2. Če misliva na isto stvar, potem bi lahko naredil sledeče:

   server <- function(input, output) {
   
   output$outplot <- renderPlot({
   t2 %>%
   filter(drzava == input$z) %>%
   ggplot(aes_string(x=input$x, y=input$y)) + geom_point() + geom_text(aes(label=igralec),hjust=0, vjust=0, size=3)
   })
   }

   ui <- fluidPage(
   inputPanel(
   selectInput('x', 'X', choices = c("penaltyFaced", "savedShotsFromOutsideTheBox", "savedShotsFromInsideTheBox"),
               selected = "savedShotsFromInsideTheBox"),
   selectInput('y', 'Y', choices = c("penaltySave", "goalsConcededOutsideTheBox", "goalsConcededInsideTheBox"), 
               selected = "goalsConcededInsideTheBox"),
   selectInput('z', 'drzava', choices = unique(t2$drzava), selected = "Spain")
   ), 
   mainPanel(plotOutput("outplot")) 
   )

   \ Poleg tega predlagam še, da v poročilu tudi pri izrisu zemljevidov dodaš message = FALSE, da se izogneš nepotrebnemu izpisu sporočil.

[mperbil]

Hvala za pomoč, sem popravil vse. Mi pa še vedno ko poženem poročilo izpiše sporočilo:

Warning: package 'sf' was built under R version 3.6.2

[timotejvesel]

Prosim, če naložiš te spremembe na git. Pri trenutni verziji (pred popravki) tega sporočila ne izpiše.

[mperbil]

Sedaj sem naložil spremembe. Sem pa sedaj opazil še eno napako in sicer imam v poročilu pod naslovom Napredna analiza podatkov tri vrstice pred katerimi je znak #, ko pa ta znak odstranim, da je tako kot pri drugih fazah, mi poročila sploh ne more pognati.

[timotejvesel]

Ko poženem poročilo v binderju, sporočila Warning: package 'sf' was built under R version 3.6.2 ne izpiše, zato predvidevam, da to ne bo problem. \ Kot je poročilo napisano sedaj, teh treh vrstic ne potrebuješ, zato jih lahko zakodiraš oziroma kar izbrišeš.

[mperbil]

Vredu. Hvala

[jaanos]

Opozorilo se nanaša na lokalno instalacijo knjižnice sf, tako da se drugod morda ne bo pojavilo. Parameter message=FALSE lahko dodaš še pri ostalih blokih kode, da se taka opozorila ne bodo pojavljala v poročilu.