歐先生（R語言）玩轉Tensorflow（三）

01-30

如何定義Tensorflow的變數

各位看官大家好，歡迎繼續關注我們的《歐先生（R語言）玩轉Tensorflow》系列文檔，在《歐先生（R語言）玩轉Tensorflow（一）》中，我們介紹了在R語言環境下調用Tensorflow的基本方法，在這一節中，我們將繼續討論，歐先生（Microsoft R Open）如何定義Tensorflow的變數。

事實上，Tensorflow的變數定義與R的語法有很大不同，特別注意需要初始化。。。。

1 載入Tensorflow

library(tensorflow)n

2 定義Tensorflow的變數

sess <- tf$InteractiveSession()nraw_data <- c(1., 2., 8., -1., 0., 5.5, 6., 13)nnspike <- tf$Variable(FALSE) #定義變數nspike$initializer$run() #變數初始化n

3 小栗子：判斷間隔是否大於5

for(i in 2:length(raw_data)){n if(raw_data[i] - raw_data[i-1] > 5){n updater <- tf$assign(spike, tf$constant(TRUE))#大於5，賦值TRUEn updater$eval()n }else{n tf$assign(spike, FALSE)$eval()#小於5，賦值FALSEn }n print(paste("Spike", spike$eval()))n}n

4 關閉sess

sess$close()n

5 輸出結果

[1] "Spike FALSE"

[1] "Spike TRUE"

[1] "Spike FALSE"

[1] "Spike TRUE"

[1] "Spike FALSE"

[1] "Spike TRUE"

我們的環境

WIN7 64位
RSTUDIO
Microsoft R Open 3.4
Anaconda3-4.4.0-Windows-x86_64

編後語

本文代碼參考haven-jeon/TensorFlow-Book-R

我們將繼續推出R語言語法、統計分析數據挖掘等一系列文章。你的點贊和關注使我們最大的動力。