{
"cells": [
{
"cell_type": "code",
"execution_count": 1,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"\n",
"\t- TRUE
\n",
"\t- TRUE
\n",
"\t- TRUE
\n",
"\t- TRUE
\n",
"\t- TRUE
\n",
"
\n"
],
"text/latex": [
"\\begin{enumerate}\n",
"\\item TRUE\n",
"\\item TRUE\n",
"\\item TRUE\n",
"\\item TRUE\n",
"\\item TRUE\n",
"\\end{enumerate}\n"
],
"text/markdown": [
"1. TRUE\n",
"2. TRUE\n",
"3. TRUE\n",
"4. TRUE\n",
"5. TRUE\n",
"\n",
"\n"
],
"text/plain": [
"[[1]]\n",
"[1] TRUE\n",
"\n",
"[[2]]\n",
"[1] TRUE\n",
"\n",
"[[3]]\n",
"[1] TRUE\n",
"\n",
"[[4]]\n",
"[1] TRUE\n",
"\n",
"[[5]]\n",
"[1] TRUE\n"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"rm(list=ls())\n",
"library(LalRUtils)\n",
"load_or_install(c('tidyverse','data.table','magrittr','lfe','devtools'))"
]
},
{
"cell_type": "markdown",
"metadata": {},
"source": [
"# Linear Algebra"
]
},
{
"cell_type": "code",
"execution_count": 2,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"\n",
"\n",
"\t| 1 | 4 | 5 |
\n",
"\t| 10 | 2 | 3 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{lll}\n",
"\t 1 & 4 & 5 \\\\\n",
"\t 10 & 2 & 3 \\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| 1 | 4 | 5 | \n",
"| 10 | 2 | 3 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2] [,3]\n",
"[1,] 1 4 5 \n",
"[2,] 10 2 3 "
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"\n",
"\n",
"\t| 2 | 3 |
\n",
"\t| 1 | 5 |
\n",
"\t| 3 | 5 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{ll}\n",
"\t 2 & 3\\\\\n",
"\t 1 & 5\\\\\n",
"\t 3 & 5\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| 2 | 3 | \n",
"| 1 | 5 | \n",
"| 3 | 5 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2]\n",
"[1,] 2 3 \n",
"[2,] 1 5 \n",
"[3,] 3 5 "
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"\n",
"\n",
"\t| 21 | 48 |
\n",
"\t| 31 | 55 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{ll}\n",
"\t 21 & 48\\\\\n",
"\t 31 & 55\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| 21 | 48 | \n",
"| 31 | 55 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2]\n",
"[1,] 21 48 \n",
"[2,] 31 55 "
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"(X = rbind(c(1,4,5),c(10,2,3)))\n",
"(Y = rbind(c(2,3),c(1,5), c(3,5)))\n",
"X %*% Y"
]
},
{
"cell_type": "code",
"execution_count": 3,
"metadata": {},
"outputs": [
{
"data": {
"text/html": [
"\n",
"\n",
"\t| 2 | 3 | 4 |
\n",
"\t| 3 | 1 | 3 |
\n",
"\t| 2 | 4 | 2 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{lll}\n",
"\t 2 & 3 & 4\\\\\n",
"\t 3 & 1 & 3\\\\\n",
"\t 2 & 4 & 2\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| 2 | 3 | 4 | \n",
"| 3 | 1 | 3 | \n",
"| 2 | 4 | 2 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2] [,3]\n",
"[1,] 2 3 4 \n",
"[2,] 3 1 3 \n",
"[3,] 2 4 2 "
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"\n",
"\n",
"\t| -0.5 | 0.5 | 0.25 |
\n",
"\t| 0.0 | -0.2 | 0.30 |
\n",
"\t| 0.5 | -0.1 | -0.35 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{lll}\n",
"\t -0.5 & 0.5 & 0.25\\\\\n",
"\t 0.0 & -0.2 & 0.30\\\\\n",
"\t 0.5 & -0.1 & -0.35\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| -0.5 | 0.5 | 0.25 | \n",
"| 0.0 | -0.2 | 0.30 | \n",
"| 0.5 | -0.1 | -0.35 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2] [,3] \n",
"[1,] -0.5 0.5 0.25\n",
"[2,] 0.0 -0.2 0.30\n",
"[3,] 0.5 -0.1 -0.35"
]
},
"metadata": {},
"output_type": "display_data"
},
{
"data": {
"text/html": [
"\n",
"\n",
"\t| 1 | 0 | -2.22e-16 |
\n",
"\t| 0 | 1 | 0.00e+00 |
\n",
"\t| 0 | 0 | 1.00e+00 |
\n",
"\n",
"
\n"
],
"text/latex": [
"\\begin{tabular}{lll}\n",
"\t 1 & 0 & -2.22e-16\\\\\n",
"\t 0 & 1 & 0.00e+00\\\\\n",
"\t 0 & 0 & 1.00e+00\\\\\n",
"\\end{tabular}\n"
],
"text/markdown": [
"\n",
"| 1 | 0 | -2.22e-16 | \n",
"| 0 | 1 | 0.00e+00 | \n",
"| 0 | 0 | 1.00e+00 | \n",
"\n",
"\n"
],
"text/plain": [
" [,1] [,2] [,3] \n",
"[1,] 1 0 -2.22e-16\n",
"[2,] 0 1 0.00e+00\n",
"[3,] 0 0 1.00e+00"
]
},
"metadata": {},
"output_type": "display_data"
}
],
"source": [
"(X = rbind(c(2,3,4), c(3,1,3), c(2,4,2)))\n",
"(X_inv = solve(X))\n",
"X %*% X_inv"
]
},
{
"cell_type": "code",
"execution_count": null,
"metadata": {},
"outputs": [],
"source": []
}
],
"metadata": {
"kernelspec": {
"display_name": "R",
"language": "R",
"name": "ir"
},
"language_info": {
"codemirror_mode": "r",
"file_extension": ".r",
"mimetype": "text/x-r-source",
"name": "R",
"pygments_lexer": "r",
"version": "3.5.1"
}
},
"nbformat": 4,
"nbformat_minor": 2
}