zantavcar / APPR-2015-16

Repozitorij z gradivi za predmet Analiza podatkov s programom R v študijskem letu 2015/16
MIT License
0 stars 1 forks source link

pomoč pri Shiny in ideje za analizo #7

Open zantavcar opened 8 years ago

zantavcar commented 8 years ago

S spoštovanjem, izdelal sem shiny aplikacijo, ki primerja države med seboj glede št. prošenj za azil in še nekaj drugih reči. V main panelu imam dve tabeli, vendar me moti, ker je pri vsaki Search okno, spodaj kaže npr. število strani, zanima me kako bi se tega znebil.

Potreboval bi še manjšo pomoč pri analizi, zanima me vaše mnenje: napredno analizo bom prav tako izvedel s pomočjo shinyija, in sicer, da bi za vsako državo naredil graf dinamike prošenj, ga aproksimiral z nekim polinomom, nato pa bi recimo dodal tri drsnike, recimo politika evropskih držav, razmere na bojišču, pa recimo vreme in na podlagi tega bi se graf primerno oblikoval. Zanima me, če bi to šlo...

jaanos commented 8 years ago

Da odstraniš iskanje in delitev po straneh, zamenjaj ukaza dataTableOutput in renderDataTable z DT::dataTableOutput in DT::renderDataTable, pri slednjem pa podaj parameter options = list(searching = FALSE, paging = FALSE).

Kar se analize tiče, bi šlo, če seveda imaš ustrezne podatke.

zantavcar commented 8 years ago

Še eno vprašanje imam, kako bi iz barplota origin_graf <- ggplot(origin %>% filter(GEO %in% c("Slovenia")), aes(x=CITIZEN,y=applicants,fill=GEO,color=GEO))+ geom_bar(stat="identity",position=position_dodge())+ ggtitle(paste0("Origin of asylum seekers in ","Slovenia"))

naredil pie chart, poizkusil sem z dodatnim +coord_polar(theta="y") ter pri geom_bar sem odstranil position=position_dodge(), ampak jaz bi naredil pie chart tak, kot ga imam pri spolih... Bi moral tak graf definirati z pie, ali bi šlo kako drugače?

Hvala za odgovor, LP Žan

jaanos commented 8 years ago

Če hočeš narediti tortni diagram, za x postaviš konstanto, dele diagrama pa predstaviš z barvo:

origin_graf <- ggplot(origin %>% filter(GEO %in% c("Slovenia")),
                      aes(x=factor(1), y=applicants, fill=CITIZEN)) +
  geom_bar(stat="identity", width=1) + coord_polar(theta="y") +
  ggtitle(paste0("Origin of asylum seekers in ","Slovenia"))