99999久久久久久亚洲,欧美人与禽猛交狂配,高清日韩av在线影院,一个人在线高清免费观看,啦啦啦在线视频免费观看www

熱線電話：13121318867

登錄
首頁精彩閱讀R語言基礎(chǔ)語法
R語言基礎(chǔ)語法
2018-02-23
收藏

R語言基礎(chǔ)語法

學(xué)習(xí)一個新編程語言的慣例是什么？，當(dāng)然是編寫一個“Hello，World！”，下面我們將演示如何使用R編程編寫一個“Hello，World！”程序。根據(jù)需要，您可以在R命令提示符下編程，也可以使用R腳本文件編寫程序。

R命令提示符

當(dāng)安裝好了R開發(fā)環(huán)境以后，那么通過在命令提示符下鍵入以下命令，就可以啟動R命令提示符 -

$ R

Shell

或者，在Windows系統(tǒng)下 -

C:\Users\Administrator> R

Shell

這將啟動R解釋器，您將獲得一個提示>您可以在以下開始編寫程序 -

上圖程序中，第一個語句定義了一個字符串變量str，然后分配一個字符串“Hello，World~！”，下一個語句print()用于打印存儲在變量str中的值。

R腳本文件

通常，我們通過在腳本文件中編寫R代碼，然后再通過名為Rscript的R解釋器的幫助下，在命令提示符下執(zhí)行這些腳本。 所以下面演示如何在一個名為test.R的文本中編寫代碼，如下 -

# My first program in R Programming
myString <- "Hello, World!"

print ( myString)

將上述代碼保存在test.R文件中，并在Linux命令提示符下執(zhí)行，如下所示。即使您使用Windows或其他系統(tǒng)，語法將保持不變。

$ Rscript test.R

Shell

當(dāng)我們運行上述程序時，會產(chǎn)生以下結(jié)果(Windows)

C:\Users\Administrator>F:

F:>cd worksp\R

F:\worksp\R>dir
2017/08/22  21:52    <DIR>          .
2017/08/22  21:52    <DIR>          ..
2017/08/22  21:53                85 test.R
               1 個文件             85 字節(jié)
               2 個目錄 53,158,862,848 可用字節(jié)

F:\worksp\R>Rscript test.R
[1] "Hello, World!"

F:\worksp\R>


注釋

注釋就像在R程序中幫助文本，并且在執(zhí)行實際程序時被解釋器忽略。單個注釋在語句的開頭使用#寫成如下：

# My first program in R Programming

R

R不支持多行注釋，但可以執(zhí)行以下操作：

if(FALSE) {
   "This is a demo for multi-line comments and it should be put inside either a single
      OR double quote"
}

myString <- "Hello, World!"
print ( myString)


雖然上述注釋由R解釋器執(zhí)行，但不會干擾您的實際編程代碼。所以我們可以把要注釋的內(nèi)容放入單引號或雙引號中。


數(shù)據(jù)分析咨詢請掃描二維碼

若不方便掃碼，搜微信號：CDAshujufenxi

數(shù)據(jù)分析師資訊
更多

OK
客服在線
立即咨詢
客服在線
立即咨詢
') } function initGt() { var handler = function (captchaObj) { captchaObj.appendTo('#captcha'); captchaObj.onReady(function () { $("#wait").hide(); }).onSuccess(function(){ $('.getcheckcode').removeClass('dis'); $('.getcheckcode').trigger('click'); }); window.captchaObj = captchaObj; }; $('#captcha').show(); $.ajax({ url: "/login/gtstart?t=" + (new Date()).getTime(), // 加隨機(jī)數(shù)防止緩存 type: "get", dataType: "json", success: function (data) { $('#text').hide(); $('#wait').show(); // 調(diào)用 initGeetest 進(jìn)行初始化 // 參數(shù)1：配置參數(shù) // 參數(shù)2：回調(diào)，回調(diào)的第一個參數(shù)驗證碼對象，之后可以使用它調(diào)用相應(yīng)的接口 initGeetest({ // 以下 4 個配置參數(shù)為必須，不能缺少 gt: data.gt, challenge: data.challenge, offline: !data.success, // 表示用戶后臺檢測極驗服務(wù)器是否宕機(jī) new_captcha: data.new_captcha, // 用于宕機(jī)時表示是新驗證碼的宕機(jī) product: "float", // 產(chǎn)品形式，包括：float，popup width: "280px", https: true // 更多配置參數(shù)說明請參見：http://docs.geetest.com/install/client/web-front/ }, handler); } }); } function codeCutdown() { if(_wait == 0){ //倒計時完成 $(".getcheckcode").removeClass('dis').html("重新獲取"); }else{ $(".getcheckcode").addClass('dis').html("重新獲取("+_wait+"s)"); _wait--; setTimeout(function () { codeCutdown(); },1000); } } function inputValidate(ele,telInput) { var oInput = ele; var inputVal = oInput.val(); var oType = ele.attr('data-type'); var oEtag = $('#etag').val(); var oErr = oInput.closest('.form_box').next('.err_txt'); var empTxt = '請輸入'+oInput.attr('placeholder')+'！'; var errTxt = '請輸入正確的'+oInput.attr('placeholder')+'！'; var pattern; if(inputVal==""){ if(!telInput){ errFun(oErr,empTxt); } return false; }else { switch (oType){ case 'login_mobile': pattern = /^1[3456789]\d{9}$/; if(inputVal.length==11) { $.ajax({ url: '/login/checkmobile', type: "post", dataType: "json", data: { mobile: inputVal, etag: oEtag, page_ur: window.location.href, page_referer: document.referrer }, success: function (data) { } }); } break; case 'login_yzm': pattern = /^\d{6}$/; break; } if(oType=='login_mobile'){ } if(!!validateFun(pattern,inputVal)){ errFun(oErr,'') if(telInput){ $('.getcheckcode').removeClass('dis'); } }else { if(!telInput) { errFun(oErr, errTxt); }else { $('.getcheckcode').addClass('dis'); } return false; } } return true; } function errFun(obj,msg) { obj.html(msg); if(msg==''){ $('.login_submit').removeClass('dis'); }else { $('.login_submit').addClass('dis'); } } function validateFun(pat,val) { return pat.test(val); }