--- title: "NTU Computer Programming - HW08" author: "Feng-Li Lian" date: "2018, 5, 10" ID: B01931001 Subject: plot figure output: pdf_document --- ## write something about your goal The goal is to plot the data iris[ , 1] in specified formats. Assigne the data ```{r iris} mydata <- iris[ , 1 ] mydata ``` ## Generate preliminar analysis ```{r} summary( mydata ) mydata head( mydata ) tail( mydata ) str( mydata ) ``` ## Including Plots First plot! ```{r iris[ , 1 ] , echo=FALSE } plot ( mydata ) ``` ###################################### # 繪圖之設定 # 邊界文字縮放比: mex = 0.8 # 下左上右四個邊界之預留距離: mar = c(6, 6, 3, 3) ```{r} par( mex = , mar = ) plot( mydata ) ``` #x軸範圍為( -20, 180) #y軸範圍為( 2, 10 ) ```{r} plot( mydata, xlim = , ylim = ) ``` # x軸名稱為Plant ID # y軸名稱為Length of Sepal # 主標題為IRIS Data # 繪製藍色的圖形 # 點的形式為2 # 文字及符號相對於內定值之縮放比為2 ```{r} plot( mydata, , , , ) ``` # 下面座標軸,座標線為綠色,座標數字為紅色 # 在左上角加上標記:Plant ID vs Sepal.Length # 在(120,4)的地方,放入文字:Plot the IRIS data, Sepal.Length # 在(120,4.5)的地方,放入數學符號 ```{r} plot( mydata, , , , , ) axis( ) legend( ) text( ) text( ) ```