在 CENTOS7 下，透過EPEL 安裝 R

在 CENTOS7 下，透過EPEL 安裝 R

su -c 'rpm -Uvh https://dl.fedoraproject.org/pub/epel/epel-release-latest-7.noarch.rpm'

然後:
sudo yum install epel-release
sudo yum -y update
sudo yum -y install R

如果要安裝 R 的一些套件，使用 yum 搜尋 R- 開頭的套件：
yum list R-\*

安裝好之後，由終端機，執行 R

Linux MongoDB 徹底清除 replSet 狀態步驟

先關閉 replication 然後重啟 MongoDB 處於不具備replSet的執行狀態
接下來 輸入 mongo 以進入 MongoDB Console
進入後執行以下指令
use local;
db.dropDatabase();

下db.stats()確認結果看看
如果無誤離開 MongoDB Console

修改 replication 然後重啟 MongoDB 處於具備replSet的執行狀態
進入 MongoDB Console 檢查確認狀態。

Linux 查看程式佔用哪個port

例如：
查看 MongoDB 的 27017 被誰佔用著
lsof -i -P | grep -i "listen" | grep 27017

Hello Shiny!

第一次需要安裝套件
install.packages("shiny")
library(shiny)

範例:
runExample("01_hello")


shiny 產出的目錄匣，裡面有兩個程式碼檔案
server.R
ui.R

範例: 建立一個Hello World 目錄以及兩個檔案
setwd("C:/NTUTrainRL2")
dir.create("HelloWorld")
file.create("HelloWorld/ui.R")
file.create("HelloWorld/server.R")

修改了 兩個內容
server.R
ui.R

將以下的程式碼貼入`HelloWorld/ui.R
shinyUI(fluidPage(

  titlePanel("Hello World!"),

  sidebarLayout(
    sidebarPanel(
      sliderInput("bins",
                  "Number of bins:",
                  min = 5,
                  max = 30,
                  value = 15)#change min/max/default
    ),

    mainPanel(
      plotOutput("distPlot")
    )
  )
))

#將以下的程式碼貼入`HelloWorld/server.R`
shinyServer(function(input, output) {

  output$distPlot <- renderPlot({
    x    <- faithful[, 2]
    bins <- seq(min(x), max(x), length.out = input$bins + 1)

    hist(x, breaks = bins, col = 'skyblue', border = 'white')#change col
  })
})


#完成後，就使用以下指令執行
runApp("HelloWorld")

#將結果公開
到 shinyapps.io 申請一個帳號 https://www.shinyapps.io/
之後可以將 輸出結果 連結至 shinyapps.io
將申請下來的 token code (rsconnect......)
貼到 RStudio Console 執行即可。

執行過  Token 之後，然後到編輯區，找到 Publish Applications
將內容上傳至 shinyapps.io

RStudio 第一次啟用 R Markdown

RStudio 第一次啟用 R Markdown:
Menu File > New File > R markdown
會開始安裝套件

套件安裝好之後，從程式編輯區找到 knit HTML 功能，
按下去，輸出結果就會根據 R Markdown 修飾指令，影響輸出結果。
例如:

```{r}
summary(cars)
```

的輸出結果，與底下的輸出結果，是不同的。

指定echo=FALSE就不會印出summary(cars)的程式碼區塊但還是會印出結果。

```{r echo=FALSE}

summary(cars)

```

參考參數如下:

echo: (TRUE; logical)

results: (‘markup’; character)

markup

asis

hold

hide

warning: (TRUE; logical)

error: (TRUE; logical)

message: (TRUE; logical)

以下示範 連結 與 圖片 ，其中圖片部分，前面有加上 禁嘆號
# 連結
[點此連結至系統訓練班網頁](https://www.csie.ntu.edu.tw/train/)


# 圖片


輸出 PDF 的話，須要在 windows 底下先安裝好 MikTeX 套件

類似 LINUX 的 PIPE 觀念 指令 %>%

%>%

例如, 使用 Pipe:

packs <- c("leaflet", "magrittr")
for (i in 1:length(packs)){
  install.packages(packs[i])
}
sapply(packs, library, character.only=T)

helloMap <- leaflet() %>%
  addTiles() %>% #把預設的地圖圖層加入
  addMarkers(lng=121.539366, lat=25.017326, popup="National Taiwan University")
helloMap


不使用 Pipe
# 如果你不習慣使用pipe run %>%
helloMap <- addMarkers(addTiles(leaflet()), lng=121.539366, lat=25.017326, popup="National Taiwan University")
helloMap

Linux MongoDB Replication

寫在前面，避免踩到地雷。因為架設了環境，省略了DNS SERVER存在，所以就在各DB主機上，直接修改  hosts 圖方便，讓各DB主機可以相互用 hostname 找到對方，而不是用 IP 位置來找彼此。但是要注意:

不可以在扮演仲裁角色(arbiters)的主機上，hosts寫成這樣
127.0.0.1    mongodb4 mongodb4.hgdata.com.tw
正確應該是
192.168.1.xx    mongodb4 mongodb4.hgdata.com.tw

否則仲裁角色主機會一直呈現 OTHER> 的提示，
從  telnet localhost 27017 失敗時候發現的
telnet localhost 27017 會失敗，但是
telnet 127.0.0.1 27017 卻成功。

=======================================
製作KEY ( 如不製作KEY 本節可以先忽略)
openssl rand -base64 741 > /var/lib/mongo/mongo-keyfile
chmod 600 mongo-keyfile
chown mongod.mongod /var/lib/mongo/mongo-keyfile
改 600 屬性，一定要作，不然無法啟動 MongoDB
把這 Key 放到每一台機器的 /var/lib/mongo/mongo-keyfile 檔案中。
接下來就要啟用 Replica Set 與認證模式。

vi /etc/mongod.conf

改以下

security:
  keyFile: /var/lib/mongo/mongo-keyfile

重啟 MongoDB 服務
systemctl restart mongod

=======================================
架構上，分別有4台  MongoDB Server
192.168.1.51 Mondb1
192.168.1.52 Mondb2
192.168.1.53 Mondb3
192.168.1.54 Mondb4  規劃轉成仲裁角色，用來分配其他三台成員的角色

開始:
vi /etc/mongod.conf

改以下
replication:
    oplogSizeMB: 10240
    replSetName: "rs1"

重啟 MongoDB 服務
systemctl restart mongod

=======================================
從 192.168.1.21 輸入 mongo 進去 concole
確認
rs.status()

初使化 replSet
rs.initiate()

再確認
rs.status()
會看到PRIMARY字眼，表示初始化完成

加入第二台DB
rs.add("192.168.1.22:27017")
rs.add("192.168.1.23:27017")
加入仲裁主機
rs.addArb("192.168.1.24:27017")

從 192.168.1.21 再確認
rs.status()

看到 192.168.1.22 是
"health" : 1,
"state" : 0,
"stateStr" : "STARTUP"

state的意義
0 Phase 1, starting up
1 Primary member
2 Secondary member

然後發現 192.168.1.21 變成了 rs1:SECONDARY> 提示
意思各主機之間選舉完成，該主機已經轉型成 SECONDARY 角色

*** 到 192.168.1.22 主機上
初使化 replSet
rs.initiate()

確認
rs.status()
然後發現 192.168.1.22 變成了 rs1:PRIMARY> 提示


*** 到 192.168.1.23 主機上
初使化 replSet
rs.initiate()
注意：如果 /etc/mongod.conf 裡面的設定是 bindIp: 127.0.0.1 就會失敗


確認
rs.status()
然後發現 192.168.1.23 變成了 rs1:PRIMARY> 提示

確認本機DB 角色是否為 Master, 指令: 

rs.isMaster()

-----------------------------------------------
END
-----------------------------------------------

查看複制集狀態
rs.status()
rs.isMaster();
以rs.help() 顯示更多 rs指令


以db.help() 顯示更多 db指令

db.oplog.rs.find();

db.printReplicationInfo();

db.printSlaveReplicationInfo();

db.system.replset.find();

db.getMongo().setSlaveOk();

增加節點

rs.add("localhost:28013")
rs.status();

減少節點
rs.remove("localhost:28014")