R中計算加法運算，而不循環

Question

所以我有這個例子：

Σ _{I = 1} √   I ^（3）+日誌（5） 

我需要解決使用R.編碼

我的編碼是：

i<-seq(from=1,to=32) 
sqrt((i)^3+log(5)) 
sum(sqrt((i)^3+log(5))) 

但我不確定它是否正確。 任何提示？

Answer 1

您可以通過在較小的示例上運行來檢查這些事情，您可以通過手動執行計算來說服自己正在工作。所以......

您的代碼：

> i<-seq(from=1,to=32) 
> sum(sqrt((i)^3+log(5))) 
[1] 2409.853 

這是32米的東西的總和：sqrt(1^3 + log(5) + sqrt(2^3 + log(5)) +等硬輸入了這一切，。所以讓我們嘗試用1兩件事：

> i<-seq(from=1,to=1) 
> sum(sqrt((i)^3+log(5))) 
[1] 1.615375 

現在我們可以通過運行檢查：

> sqrt(1^3+log(5)) 
[1] 1.615375 

好吧，看起來不錯。讓我們嘗試兩件事。您的代碼：

> i<-seq(from=1,to=2) 
> sum(sqrt((i)^3+log(5))) 
[1] 4.715285 

繞行很長的路要走相比：

> sqrt(1^3+log(5)) + sqrt(2^3+log(5)) 
[1] 4.715285 

耶！現在檢查它的三個項目，應該說服任何人。它不是一個正確性的數學證明。一個更復雜的函數可能會做一些意想不到的事情...