"# print(cbind(af,PctExp=afss/sum(afss)*100))"
]
},
- {
- "cell_type": "code",
- "execution_count": null,
- "metadata": {},
- "outputs": [],
- "source": [
- "# ggplot(rubber, aes(x=hardness, y=loss)) + \n",
- "# geom_point() +\n",
- "# stat_smooth(method = \"lm\", col = \"red\")"
- ]
- },
{
"cell_type": "code",
"execution_count": null,
{
"cell_type": "code",
"execution_count": null,
- "metadata": {},
+ "metadata": {
+ "hidden": true
+ },
"outputs": [],
"source": [
"ggplotRegression(fit.s)"