O amor, quando se revela,
Não se sabe revelar.
Sabe bem olhar p’ra ela,
Mas não lhe sabe falar.
Quem quer dizer o que sente
Não sabe o que há de dizer.
Fala: parece que mente…
Cala: parece esquecer…
Ah, mas se ela adivinhasse,
Se pudesse ouvir o olhar,
E se um olhar lhe bastasse
P’ra saber que a estão a amar!
Mas quem sente muito, cala;
Quem quer dizer quanto sente
Fica sem alma nem fala,
Fica só, inteiramente!
Mas se isto puder contar-lhe
O que não lhe ouso contar,
Já não terei que falar-lhe
Porque lhe estou a falar…
Para isso, eu preciso criar um “chunk”
simblo “+C” verdinho
# Meu primeiro vetor
idade = c(18,18,18,17,19,17,18,18)
# Meu primeiro gráfico
plot(idade)
# Meu primeiro gráfico de barras
barplot(idade)
#Podemos melhorar
tabidade=table(idade)
barplot(tabidade,
col= c("#5e84ab", "red"))