pita pri tabeli moški delfin

[tinahawlina]

Moja koda: drzave <- unique(gsub("(.), (.)", "\2", moskidelfin$Kraj.prvenstva)) rekordi <- sapply(drzave, function(x) sum(gsub("(.), (.)", "\2", moskidelfin$Kraj.prvenstva) == x))

pdf("slike/moskidelfin.pdf") #naslov pdfja pie(moskidelfin, cex = 0.5, main = "Število rekordov po državah za moške delfin")

text(0,1,"Moški delfin", cex =2)

dev.off() Vrača mi pa napako: Error in pie(moskidelfin, cex = 0.5, main = "Število rekordov po državah za moške delfin") : 'x' values must be positive.

Aja, drugače, jemlje po državah, naj bi pokazal v kateri državi je bilo doseženih največ rekordov.

[tinahawlina]

V resnici je to, pri na katerih prvenstvih(v katerih državah) je bilo doseženih največ rekordov.

[jaanos]

Tortni diagram rišeš iz ravnokar pripravljenega vektorja rekordi, ne pa iz celotne razpredelnice moskidelfin. Frekvence posameznih vrednosti lahko dobiš s funkcijo table, tako da lahko svojo kodo poenostaviš na:

rekordi <- table(gsub("(.*), (.*)", "\\2", moskidelfin$Kraj.prvenstva))

pdf("slike/moskidelfin.pdf") #naslov pdfja
pie(rekordi, cex = 0.5, main = "Število rekordov po državah za moške delfin")
dev.off()

Mimogrede, v projekt.r vključuješ programa iz mape slike, ki pa imata končnico .R (velika črka). To upoštevaj tudi pri imenih datotek, saj sicer ne bo delovalo na vseh sistemih.

Še to: če želiš v issue vključiti kodo, potem pred njo postavi vrstico

```R

za njo pa vrstico

Tako ti bo lepo prikazalo kodo in jo pobarvalo, hkrati pa se izogneš interpretaciji nekaterih znakov kot oblikovanje v Markdownu (zvezdice npr. označujejo poševno besedilo).

[tinahawlina]

Okej bom naslednjič, hvala! :D