{"comment":{"url":"https://api.github.com/repos/myellen/MF850_Computational_Finance_Final/comments/20225162","html_url":"https://github.com/myellen/MF850_Computational_Finance_Final/commit/986bbd9b5fdb8e116c6e4470647a469840885e2d#commitcomment-20225162","id":20225162,"user":{"login":"lintr-bot","id":10925265,"avatar_url":"https://avatars.githubusercontent.com/u/10925265?v=3","gravatar_id":"","url":"https://api.github.com/users/lintr-bot","html_url":"https://github.com/lintr-bot","followers_url":"https://api.github.com/users/lintr-bot/followers","following_url":"https://api.github.com/users/lintr-bot/following{/other_user}","gists_url":"https://api.github.com/users/lintr-bot/gists{/gist_id}","starred_url":"https://api.github.com/users/lintr-bot/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/lintr-bot/subscriptions","organizations_url":"https://api.github.com/users/lintr-bot/orgs","repos_url":"https://api.github.com/users/lintr-bot/repos","events_url":"https://api.github.com/users/lintr-bot/events{/privacy}","received_events_url":"https://api.github.com/users/lintr-bot/received_events","type":"User","site_admin":false},"position":null,"line":null,"path":null,"commit_id":"986bbd9b5fdb8e116c6e4470647a469840885e2d","created_at":"2016-12-18T02:49:40Z","updated_at":"2016-12-18T02:49:40Z","body":"[data_exploration-12-5.R:9:23:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L9) *style:* **Put spaces around all infix operators.**\n```r\n​hist(RETMONTH, breaks =60)\n                      ^~\n```\n[data_exploration-12-5.R:11:35:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L11) *style:* **Put spaces around all infix operators.**\n```r\n​(re_up <- length(RETMONTH[RETMONTH<0]))\n                                 ~^~\n```\n[data_exploration-12-5.R:12:37:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L12) *style:* **Put spaces around all infix operators.**\n```r\n​(re_down <- length(RETMONTH[RETMONTH>0])) \n                                   ~^~\n```\n[data_exploration-12-5.R:12:42:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L12) *style:* **Trailing whitespace is superfluous.**\n```r\n​(re_down <- length(RETMONTH[RETMONTH>0])) \n                                         ^\n```\n[data_exploration-12-5.R:14:6:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L14) *style:* **Put spaces around all infix operators.**\n```r\n​re_up/(re_up+re_down)\n    ~^~\n```\n[data_exploration-12-5.R:14:7:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L14) *style:* **Place a space before left parenthesis, except in a function call.**\n```r\n​re_up/(re_up+re_down)\n      ^\n```\n[data_exploration-12-5.R:14:13:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L14) *style:* **Put spaces around all infix operators.**\n```r\n​re_up/(re_up+re_down)\n           ~^~\n```\n[data_exploration-12-5.R:16:28:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L16) *style:* **Put spaces around all infix operators.**\n```r\n​up_down <- ifelse(RETMONTH >0, 1, 0)\n                           ^~\n```\n[data_exploration-12-5.R:27:26:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L27) *style:* **Commas should always have a space after.**\n```r\n​uniqueness <- apply(data,2,numb_unique)\n                         ^\n```\n[data_exploration-12-5.R:27:28:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L27) *style:* **Commas should always have a space after.**\n```r\n​uniqueness <- apply(data,2,numb_unique)\n                           ^\n```\n[data_exploration-12-5.R:29:29:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L29) *style:* **Put spaces around all infix operators.**\n```r\n​length(uniqueness[uniqueness<50])\n                           ~^~\n```\n[data_exploration-12-5.R:31:18:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L31) *style:* **Put spaces around all infix operators.**\n```r\n​which(uniqueness <50)\n                 ^~\n```\n[data_exploration-12-5.R:35:32:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L35) *style:* **Only use double-quotes.**\n```r\n​plot(RETMONTH[n_low:n], type = 'l', col= 'red', lwd = 2)\n                               ^~~\n```\n[data_exploration-12-5.R:35:40:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L35) *style:* **Put spaces around all infix operators.**\n```r\n​plot(RETMONTH[n_low:n], type = 'l', col= 'red', lwd = 2)\n                                      ~^\n```\n[data_exploration-12-5.R:35:42:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L35) *style:* **Only use double-quotes.**\n```r\n​plot(RETMONTH[n_low:n], type = 'l', col= 'red', lwd = 2)\n                                         ^~~~~\n```\n[data_exploration-12-5.R:36:9:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L36) *style:* **Put spaces around all infix operators.**\n```r\n​abline(h= mean(RETMONTH[n_low:n]), col = \"blue\", lwd = 2)\n       ~^\n```\n[data_exploration-12-5.R:38:28:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L38) *style:* **Put spaces around all infix operators.**\n```r\n​MSE_i <- (RETMONTH[n_low:n]-mean(RETMONTH[n_low:n]))^2\n                          ~^~\n```\n[data_exploration-12-5.R:38:53:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L38) *style:* **Put spaces around all infix operators.**\n```r\n​MSE_i <- (RETMONTH[n_low:n]-mean(RETMONTH[n_low:n]))^2\n                                                   ~^~\n```\n[data_exploration-12-5.R:44:11:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L44) *style:* **Put spaces around all infix operators.**\n```r\n​n_low <- n-1000 \n         ~^~\n```\n[data_exploration-12-5.R:44:16:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L44) *style:* **Trailing whitespace is superfluous.**\n```r\n​n_low <- n-1000 \n               ^\n```\n[data_exploration-12-5.R:65:21:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L65) *style:* **Commas should always have a space after.**\n```r\n​xs <- pca$x[n:n_low,1:9]\n                    ^\n```\n[data_exploration-12-5.R:71:30:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L71) *style:* **Commas should always have a space after.**\n```r\n​data2 <- data_no_ind[n_low:n,]\n                             ^\n```\n[data_exploration-12-5.R:79:26:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L79) *style:* **Put spaces around all infix operators.**\n```r\n​fit <- glm(updown~., data= data3, family = \"binomial\")\n                        ~^\n```\n[data_exploration-12-5.R:83:31:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L83) *style:* **Put spaces around all infix operators.**\n```r\n​cv_est <- cv.glm(data3, fit, K= 10)$delta[1]\n                             ~^\n```\n[data_exploration-12-5.R:85:2:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L85) *style:* **Put spaces around all infix operators.**\n```r\n​1-cv_est\n~^~\n```\n[data_exploration-12-5.R:86:1:](https://github.com/myellen/MF850_Computational_Finance_Final/blob/986bbd9b5fdb8e116c6e4470647a469840885e2d/data_exploration-12-5.R#L86) *style:* **Trailing blank lines are superfluous.**\n```r\n​\n^\n```"}}
{"actor":{"display_login":"lintr-bot"}}