```{r, echo = FALSE, results='asis', comment=NA, warning=FALSE, message = FALSE}
library(knitr)
library(ggplot2)
library(quantmod)
getSymbols("TYU2.F", src = "yahoo", verbose = TRUE, from = "2018-05-01")
tyu2 <- data.frame(TYU2.F)
tyu <- c(tyu2$TYU2.F.Open)
ggplot(data = tyu2 , aes(x=1:29,y=tyu))+geom_bar(stat = "identity", fill = "blue")+
scale_x_continuous(breaks = seq(1,30,1))+
scale_y_continuous(breaks = seq(0,0.2,0.01))
```
Этот код работает правильно и выдает результат.Но когда я копирую в уценку и вяжу.Сюжет показан со всем процессом (Вниз).Как это удалить.
downloading TYU2.F
done. [1] “TYU2.F”
Также есть способ, которым я могу вставить сюда несколько блестящих фрагментов кода, чтобы они стали немного более интерактивными при вязании