Does this back-trace say anything?
sit-for(0.25)
org-babel-comint-eval-invisibly-and-wait-for-file("type2"
"/var/folders/hj/hqfjch716qg5php160jbtfgh0000gn/T/babel-53134TSq/R-53134IWW"
"{\n function(object,transfer.file) {\n object\n invisible(\n
if (\n inherits(\n try(\n
{\n tfile<-tempfile()\n
write.table(object, file=tfile, sep=\"\\t\",\n
na=\"nil\",row.names=FALSE,col.names=FALSE,\n
quote=FALSE)\n
file.rename(tfile,transfer.file)\n },\n
silent=TRUE),\n \"try-error\"))\n {\n
if(!file.exists(transfer.file))\n
file.create(transfer.file)\n }\n )\n
}\n}(object=.Last.value,transfer.file=\"/var/folders/hj/hqfjch716qg5php160jbtfgh0000gn/T/babel-53134TSq/R-53134IWW\")")
org-babel-R-evaluate-session("type2"
"lm(log_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg\nlm(adj_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg.1\nlibrary(car)\nlibrary(lmtest)\nlibrary(sandwich)\ncov1
<- vcovHC(reg, type = \"HC1\")\nrobust_se <-
sqrt(diag(cov1))\n\ncov2 <- vcovHC(reg.1, type = \"HC1\")\nrobust_se2
<- sqrt(diag(cov2))\n # Adjust F
statistic\nwald_results <- waldtest(reg, vcov = cov1)\nwald_results2 <-
waldtest(reg.1, vcov = cov2)\n\n
#coeftest(reg, vcov = hccm)->reg2\noptions(scipen =
999)\nlibrary(stargazer)\nstargazer(reg.1,reg,\n align=TRUE,\n
title=\"Regression of per capita calorie intake with monthly per capita
consumer expenditure, and demographic and other socio-economic variables\",\n
dep.var.labels = c(\"Per capita calorie intake\",\"Log of per capita
calorie intake\"),\n se=list(NULL,robust_se,robust_se2),\n
omit=\"state\",\n model.numbers=FALSE,\n report = \"vct*\",\n
single.row=TRUE,\n omit.labels = \"State and region
dummies\")" value ("replace" "scalar" "latex") nil nil)
org-babel-R-evaluate("type2"
"lm(log_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg\nlm(adj_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg.1\nlibrary(car)\nlibrary(lmtest)\nlibrary(sandwich)\ncov1
<- vcovHC(reg, type = \"HC1\")\nrobust_se <-
sqrt(diag(cov1))\n\ncov2 <- vcovHC(reg.1, type = \"HC1\")\nrobust_se2
<- sqrt(diag(cov2))\n # Adjust F
statistic\nwald_results <- waldtest(reg, vcov = cov1)\nwald_results2 <-
waldtest(reg.1, vcov = cov2)\n\n
#coeftest(reg, vcov = hccm)->reg2\noptions(scipen =
999)\nlibrary(stargazer)\nstargazer(reg.1,reg,\n align=TRUE,\n
title=\"Regression of per capita calorie intake with monthly per capita
consumer expenditure, and demographic and other socio-economic variables\",\n
dep.var.labels = c(\"Per capita calorie intake\",\"Log of per capita
calorie intake\"),\n se=list(NULL,robust_se,robust_se2),\n
omit=\"state\",\n model.numbers=FALSE,\n report = \"vct*\",\n
single.row=TRUE,\n omit.labels = \"State and region
dummies\")" value ("replace" "scalar" "latex") nil nil)
org-babel-execute:R("lm(log_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg\nlm(adj_cal~sector+SocialGroup+sex+AgeChild+AgeAdult+foodprice+log(MPCE)+state_region,data=regdata,weights=weight)->reg.1\nlibrary(car)\nlibrary(lmtest)\nlibrary(sandwich)\ncov1
<- vcovHC(reg, type = \"HC1\")\nrobust_se <-
sqrt(diag(cov1))\n\ncov2 <- vcovHC(reg.1, type = \"HC1\")\nrobust_se2
<- sqrt(diag(cov2))\n # Adjust F
statistic\nwald_results <- waldtest(reg, vcov = cov1)\nwald_results2 <-
waldtest(reg.1, vcov = cov2)\n\n
#coeftest(reg, vcov = hccm)->reg2\noptions(scipen =
999)\nlibrary(stargazer)\nstargazer(reg.1,reg,\n align=TRUE,\n
title=\"Regression of per capita calorie intake with monthly per capita
consumer expenditure, and demographic and other socio-economic variables\",\n
dep.var.labels = c(\"Per capita calorie intake\",\"Log of per capita
calorie intake\"),\n se=list(NULL,robust_se,robust_se2),\n
omit=\"state\",\n model.numbers=FALSE,\n report = \"vct*\",\n
single.row=TRUE,\n omit.labels = \"State and region
dummies\")" ((:colname-names) (:rowname-names) (:result-params "replace"
"scalar" "latex") (:result-type . value) (:comments . "") (:shebang . "")
(:cache . "no") (:padline . "") (:noweb . "no") (:tangle . "no") (:exports .
"results") (:results . "replace scalar latex") (:hlines . "no") (:session .
"type2")))
org-babel-execute-src-block(nil)
org-babel-execute-src-block-maybe()
org-babel-execute-maybe()
org-babel-execute-safely-maybe()
run-hook-with-args-until-success(org-babel-execute-safely-maybe)
org-ctrl-c-ctrl-c(nil)
call-interactively(org-ctrl-c-ctrl-c nil nil)
command-execute(org-ctrl-c-ctrl-c)
> On 28-May-2016, at 10:31 pm, Charles C. Berry <[email protected]> wrote:
>
>
> p.s. one more thing - below
>
> On Sat, 28 May 2016, Charles C. Berry wrote:
>
>> On Sat, 28 May 2016, William Denton wrote:
>>
>>> On 28 May 2016, Vikas Rawal wrote:
>>>> Thanks John. Appreciate that you cared to respond to such a vague query. I
>>>> am at a loss with this one. It does not happen all the time. I think it
>>>> happens when I am processing large datasets, and CPUs and RAM of my system
>>>> are struggling to keep up. But I could be wrong.
>>> I've had the same kind of thing happen---but C-g (sometimes many) to kill
>>> the command, then rerunning, usually works without any trouble. Some
>>> strange combination of CPU and RAM and all that, the kind of thing that's
>>> not easily reproducible.
>>
>> Try this: customize `debug-on-quit' to `t' (and set for current session).
>>
>> Then when you have to quit via C-g, you will get a backtrace showing where
>> the process was hanging and how it got there. This might be helpful in
>> figuring out what is going on.
>>
>> Run your code and when you finally have to C-g out copy the *Backtrace*
>> buffer and report it back here (or on the ESS list if appropriate).
>>
>
> After you copy the buffer, you should type 'q' in the *Backtrace* buffer to
> finish up or you may have some odd messages and hangups afterwards.
>
> Chuck
