Lab moderna: add P1

Change-Id: Ibbbfa656bfcd29eef2afb9dbd78488e4484054b6
diff --git a/quad12/labmoderna/p1a/.gitignore b/quad12/labmoderna/p1a/.gitignore
new file mode 100644
index 0000000..f0de8a3
--- /dev/null
+++ b/quad12/labmoderna/p1a/.gitignore
@@ -0,0 +1 @@
+main.pdf
diff --git a/quad12/labmoderna/p1a/README.md b/quad12/labmoderna/p1a/README.md
new file mode 100644
index 0000000..55c81d5
--- /dev/null
+++ b/quad12/labmoderna/p1a/README.md
@@ -0,0 +1,8 @@
+# Pràctica 1a. Determinació de la semivida d'un radionúclid.
+
+Overleaf project (where the original report was written):
+https://www.overleaf.com/project/640d23c5debc8133b9e6c760.
+
+The overleaf project is guaranteed to compile. This folder contains the code for
+the graph generation (which is tested to work) and a copy of the LaTeX code
+(which is not guaranteed to compile).
diff --git a/quad12/labmoderna/p1a/dades/bari_a.txt b/quad12/labmoderna/p1a/dades/bari_a.txt
new file mode 100644
index 0000000..1158dea
--- /dev/null
+++ b/quad12/labmoderna/p1a/dades/bari_a.txt
@@ -0,0 +1,39 @@
+t	ImpulsesPerSecond	ProgAverage	ProgVariance	FitImpulsesPerSecond

+#Time	Impulses / s	Progressive average valu	Progressive variance	Fit(Impulses / s)

+#t/s	A/#/s	A/#/s	A²/(#/s)²	A/#/s

+10,0	45,37	45,367	0,000	43,78

+20,0	38,87	42,117	10,563	41,83

+30,1	40,77	41,667	7,447	39,96

+40,1	38,17	40,792	7,882	38,18

+50,2	37,17	40,067	8,408	36,48

+60,2	33,07	38,900	13,812	34,85

+70,2	34,37	38,252	14,356	33,30

+80,3	35,97	37,967	13,133	31,81

+90,3	26,67	36,711	24,285	30,39

+100,3	26,87	35,727	30,578	29,04

+110,4	33,57	35,530	28,184	27,74

+120,4	25,27	34,675	33,883	26,51

+130,4	21,97	33,697	42,744	25,33

+140,5	19,37	32,674	53,312	24,20

+150,5	22,27	31,980	56,497	23,12

+160,5	25,37	31,567	55,529	22,09

+170,6	21,67	30,984	57,689	21,10

+180,6	24,57	30,628	56,645	20,16

+190,6	18,67	29,998	60,797	19,26

+200,7	16,07	29,302	66,976	18,40

+210,7	17,87	28,757	69,717	17,58

+220,8	18,57	28,294	71,054	16,80

+230,8	17,67	27,832	72,662	16,05

+240,8	15,67	27,325	75,543	15,33

+250,9	12,47	26,731	80,999	14,65

+260,9	14,57	26,263	83,356	14,00

+270,9	14,07	25,811	85,574	13,37

+281,0	15,77	25,452	85,992	12,78

+291,0	13,47	25,039	87,810	12,21

+301,1	12,57	24,623	89,895	11,66

+311,1	12,87	24,244	91,310	11,14

+321,1	8,57	23,754	95,898	10,65

+331,1	9,07	23,309	99,331	10,17

+341,2	7,07	22,831	103,940	9,72

+351,2	7,47	22,392	107,523	9,28

+361,3	7,07	21,967	110,879	8,87

diff --git a/quad12/labmoderna/p1a/dades/fons_a.txt b/quad12/labmoderna/p1a/dades/fons_a.txt
new file mode 100644
index 0000000..4531288
--- /dev/null
+++ b/quad12/labmoderna/p1a/dades/fons_a.txt
@@ -0,0 +1,33 @@
+t	ImpulsesPerSecond	ProgAverage	ProgVariance

+#Time	Impulses / s	Progressive average valu	Progressive variance

+#t/s	A/#/s	A/#/s	A²/(#/s)²

+10,0	0,47	0,467	0,000

+20,0	-0,53	-0,033	0,250

+30,1	0,57	0,167	0,247

+40,1	1,97	0,617	0,792

+50,2	1,27	0,747	0,702

+60,2	-0,23	0,583	0,718

+70,2	-0,63	0,410	0,797

+80,3	0,47	0,417	0,697

+90,3	1,07	0,489	0,662

+100,3	-0,43	0,397	0,672

+110,4	0,97	0,448	0,638

+120,4	-1,23	0,308	0,801

+130,4	1,47	0,397	0,834

+140,5	-0,13	0,360	0,794

+150,5	-1,03	0,267	0,861

+160,5	1,77	0,360	0,939

+170,6	0,07	0,343	0,889

+180,6	0,37	0,344	0,840

+190,6	-0,93	0,277	0,877

+200,7	-0,23	0,252	0,845

+210,7	-0,13	0,233	0,812

+220,8	-0,73	0,189	0,815

+230,8	0,67	0,210	0,789

+240,8	-1,33	0,146	0,852

+250,9	1,27	0,191	0,866

+260,9	0,97	0,221	0,855

+270,9	0,77	0,241	0,834

+281,0	0,37	0,245	0,805

+291,0	-1,63	0,180	0,894

+301,1	0,27	0,183	0,865

diff --git a/quad12/labmoderna/p1a/grafiques/README b/quad12/labmoderna/p1a/grafiques/README
new file mode 100644
index 0000000..8d55dbd
--- /dev/null
+++ b/quad12/labmoderna/p1a/grafiques/README
@@ -0,0 +1 @@
+Generated from the code in the "R" folder and copied here.
diff --git a/quad12/labmoderna/p1a/grafiques/bari.tex b/quad12/labmoderna/p1a/grafiques/bari.tex
new file mode 100644
index 0000000..e4e5535
--- /dev/null
+++ b/quad12/labmoderna/p1a/grafiques/bari.tex
@@ -0,0 +1,345 @@
+% Created by tikzDevice version 0.12.4 on 2023-03-17 00:06:45
+% !TEX encoding = UTF-8 Unicode
+\begin{tikzpicture}[x=1pt,y=1pt]
+\definecolor{fillColor}{RGB}{255,255,255}
+\path[use as bounding box,fill=fillColor,fill opacity=0.00] (0,0) rectangle (397.48,252.94);
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (372.28,203.75);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 58.92,196.22) -- ( 63.42,200.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 58.92,200.72) -- ( 63.42,196.22);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 67.43,173.82) -- ( 71.93,178.32);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 67.43,178.32) -- ( 71.93,173.82);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 76.03,180.36) -- ( 80.53,184.86);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 76.03,184.86) -- ( 80.53,180.36);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 84.55,171.40) -- ( 89.05,175.90);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 84.55,175.90) -- ( 89.05,171.40);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 93.15,167.96) -- ( 97.65,172.46);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 93.15,172.46) -- ( 97.65,167.96);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (101.66,153.83) -- (106.16,158.33);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (101.66,158.33) -- (106.16,153.83);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (110.18,158.31) -- (114.68,162.81);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (110.18,162.81) -- (114.68,158.31);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (118.78,163.82) -- (123.28,168.32);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (118.78,168.32) -- (123.28,163.82);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (127.30,131.77) -- (131.80,136.27);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (127.30,136.27) -- (131.80,131.77);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (135.81,132.46) -- (140.31,136.96);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (135.81,136.96) -- (140.31,132.46);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (144.41,155.55) -- (148.91,160.05);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (144.41,160.05) -- (148.91,155.55);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (152.93,126.95) -- (157.43,131.45);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (152.93,131.45) -- (157.43,126.95);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (161.44,115.58) -- (165.94,120.08);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (161.44,120.08) -- (165.94,115.58);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (170.04,106.62) -- (174.54,111.12);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (170.04,111.12) -- (174.54,106.62);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (178.56,116.61) -- (183.06,121.11);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (178.56,121.11) -- (183.06,116.61);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (187.08,127.29) -- (191.58,131.79);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (187.08,131.79) -- (191.58,127.29);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (195.68,114.54) -- (200.18,119.04);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (195.68,119.04) -- (200.18,114.54);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.19,124.54) -- (208.69,129.04);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.19,129.04) -- (208.69,124.54);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (212.71,104.20) -- (217.21,108.70);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (212.71,108.70) -- (217.21,104.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (221.31, 95.24) -- (225.81, 99.74);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (221.31, 99.74) -- (225.81, 95.24);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (229.82,101.45) -- (234.32,105.95);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (229.82,105.95) -- (234.32,101.45);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (238.42,103.86) -- (242.92,108.36);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (238.42,108.36) -- (242.92,103.86);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (246.94,100.76) -- (251.44,105.26);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (246.94,105.26) -- (251.44,100.76);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (255.46, 93.87) -- (259.96, 98.37);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (255.46, 98.37) -- (259.96, 93.87);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (264.06, 82.84) -- (268.56, 87.34);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (264.06, 87.34) -- (268.56, 82.84);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (272.57, 90.08) -- (277.07, 94.58);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (272.57, 94.58) -- (277.07, 90.08);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (281.09, 88.35) -- (285.59, 92.85);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (281.09, 92.85) -- (285.59, 88.35);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (289.69, 94.21) -- (294.19, 98.71);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (289.69, 98.71) -- (294.19, 94.21);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (298.20, 86.28) -- (302.70, 90.78);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (298.20, 90.78) -- (302.70, 86.28);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (306.81, 83.18) -- (311.31, 87.68);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (306.81, 87.68) -- (311.31, 83.18);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (315.32, 84.22) -- (319.82, 88.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (315.32, 88.72) -- (319.82, 84.22);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.84, 69.40) -- (328.34, 73.90);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.84, 73.90) -- (328.34, 69.40);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (332.35, 71.12) -- (336.85, 75.62);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (332.35, 75.62) -- (336.85, 71.12);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (340.95, 64.23) -- (345.45, 68.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (340.95, 68.73) -- (345.45, 64.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (349.47, 65.61) -- (353.97, 70.11);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (349.47, 70.11) -- (353.97, 65.61);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (358.07, 64.23) -- (362.57, 68.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (358.07, 68.73) -- (362.57, 64.23);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (397.48,252.94);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 52.65, 61.20) -- (350.70, 61.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 52.65, 61.20) -- ( 52.65, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 95.23, 61.20) -- ( 95.23, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (137.81, 61.20) -- (137.81, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (180.38, 61.20) -- (180.38, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (222.96, 61.20) -- (222.96, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (265.54, 61.20) -- (265.54, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (308.12, 61.20) -- (308.12, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (350.70, 61.20) -- (350.70, 55.20);
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 52.65, 39.60) {0};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 95.23, 39.60) {50};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (137.81, 39.60) {100};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (180.38, 39.60) {150};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (222.96, 39.60) {200};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (265.54, 39.60) {250};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (308.12, 39.60) {300};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (350.70, 39.60) {350};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 76.58) -- ( 49.20,179.96);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 76.58) -- ( 43.20, 76.58);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,111.04) -- ( 43.20,111.04);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,145.50) -- ( 43.20,145.50);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,179.96) -- ( 43.20,179.96);
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80, 76.58) {10};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,111.04) {20};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,145.50) {30};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,179.96) {40};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 61.20) --
+	(372.28, 61.20) --
+	(372.28,203.75) --
+	( 49.20,203.75) --
+	( 49.20, 61.20);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (397.48,252.94);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (210.74, 15.60) {$t$ (s)};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 10.80,132.47) {$I$ (\#/s)};
+\end{scope}
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (372.28,203.75);
+\definecolor{drawColor}{RGB}{209,95,238}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 61.17,193.00) --
+	( 64.16,190.61) --
+	( 67.15,188.25) --
+	( 70.14,185.94) --
+	( 73.13,183.66) --
+	( 76.12,181.42) --
+	( 79.12,179.21) --
+	( 82.11,177.04) --
+	( 85.10,174.91) --
+	( 88.09,172.80) --
+	( 91.08,170.73) --
+	( 94.07,168.70) --
+	( 97.06,166.69) --
+	(100.06,164.72) --
+	(103.05,162.78) --
+	(106.04,160.87) --
+	(109.03,158.98) --
+	(112.02,157.13) --
+	(115.01,155.31) --
+	(118.01,153.52) --
+	(121.00,151.76) --
+	(123.99,150.02) --
+	(126.98,148.31) --
+	(129.97,146.63) --
+	(132.96,144.97) --
+	(135.95,143.34) --
+	(138.95,141.74) --
+	(141.94,140.16) --
+	(144.93,138.61) --
+	(147.92,137.08) --
+	(150.91,135.58) --
+	(153.90,134.10) --
+	(156.89,132.64) --
+	(159.89,131.21) --
+	(162.88,129.80) --
+	(165.87,128.41) --
+	(168.86,127.04) --
+	(171.85,125.70) --
+	(174.84,124.37) --
+	(177.84,123.07) --
+	(180.83,121.79) --
+	(183.82,120.53) --
+	(186.81,119.28) --
+	(189.80,118.06) --
+	(192.79,116.86) --
+	(195.78,115.67) --
+	(198.78,114.51) --
+	(201.77,113.36) --
+	(204.76,112.23) --
+	(207.75,111.12) --
+	(210.74,110.03) --
+	(213.73,108.96) --
+	(216.73,107.90) --
+	(219.72,106.86) --
+	(222.71,105.83) --
+	(225.70,104.82) --
+	(228.69,103.83) --
+	(231.68,102.85) --
+	(234.67,101.89) --
+	(237.67,100.94) --
+	(240.66,100.01) --
+	(243.65, 99.09) --
+	(246.64, 98.19) --
+	(249.63, 97.30) --
+	(252.62, 96.43) --
+	(255.62, 95.57) --
+	(258.61, 94.72) --
+	(261.60, 93.89) --
+	(264.59, 93.07) --
+	(267.58, 92.26) --
+	(270.57, 91.47) --
+	(273.56, 90.69) --
+	(276.56, 89.92) --
+	(279.55, 89.16) --
+	(282.54, 88.41) --
+	(285.53, 87.68) --
+	(288.52, 86.96) --
+	(291.51, 86.25) --
+	(294.51, 85.55) --
+	(297.50, 84.86) --
+	(300.49, 84.19) --
+	(303.48, 83.52) --
+	(306.47, 82.86) --
+	(309.46, 82.22) --
+	(312.45, 81.58) --
+	(315.45, 80.96) --
+	(318.44, 80.34) --
+	(321.43, 79.74) --
+	(324.42, 79.14) --
+	(327.41, 78.56) --
+	(330.40, 77.98) --
+	(333.40, 77.41) --
+	(336.39, 76.85) --
+	(339.38, 76.30) --
+	(342.37, 75.76) --
+	(345.36, 75.23) --
+	(348.35, 74.70) --
+	(351.34, 74.19) --
+	(354.34, 73.68) --
+	(357.33, 73.18) --
+	(360.32, 72.69);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (297.83,199.47) rectangle (367.44,163.47);
+\definecolor{drawColor}{RGB}{209,95,238}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (300.53,175.47) -- (318.53,175.47);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (307.28,185.22) -- (311.78,189.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (307.28,189.72) -- (311.78,185.22);
+
+\node[text=drawColor,anchor=base west,inner sep=0pt, outer sep=0pt, scale=  1.00] at (327.53,184.03) {Mesures};
+
+\node[text=drawColor,anchor=base west,inner sep=0pt, outer sep=0pt, scale=  1.00] at (327.53,172.03) {Ajust};
+\end{scope}
+\end{tikzpicture}
diff --git a/quad12/labmoderna/p1a/grafiques/bari_linealitzat.tex b/quad12/labmoderna/p1a/grafiques/bari_linealitzat.tex
new file mode 100644
index 0000000..10a11b8
--- /dev/null
+++ b/quad12/labmoderna/p1a/grafiques/bari_linealitzat.tex
@@ -0,0 +1,245 @@
+% Created by tikzDevice version 0.12.4 on 2023-03-17 00:06:54
+% !TEX encoding = UTF-8 Unicode
+\begin{tikzpicture}[x=1pt,y=1pt]
+\definecolor{fillColor}{RGB}{255,255,255}
+\path[use as bounding box,fill=fillColor,fill opacity=0.00] (0,0) rectangle (397.48,252.94);
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (372.28,203.75);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 58.92,196.22) -- ( 63.42,200.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 58.92,200.72) -- ( 63.42,196.22);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 67.43,185.24) -- ( 71.93,189.74);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 67.43,189.74) -- ( 71.93,185.24);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 76.03,188.63) -- ( 80.53,193.13);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 76.03,193.13) -- ( 80.53,188.63);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 84.55,183.95) -- ( 89.05,188.45);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 84.55,188.45) -- ( 89.05,183.95);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 93.15,182.06) -- ( 97.65,186.56);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 93.15,186.56) -- ( 97.65,182.06);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (101.66,173.76) -- (106.16,178.26);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (101.66,178.26) -- (106.16,173.76);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (110.18,176.50) -- (114.68,181.00);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (110.18,181.00) -- (114.68,176.50);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (118.78,179.73) -- (123.28,184.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (118.78,184.23) -- (123.28,179.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (127.30,158.49) -- (131.80,162.99);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (127.30,162.99) -- (131.80,158.49);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (135.81,159.02) -- (140.31,163.52);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (135.81,163.52) -- (140.31,159.02);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (144.41,174.83) -- (148.91,179.33);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (144.41,179.33) -- (148.91,174.83);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (152.93,154.66) -- (157.43,159.16);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (152.93,159.16) -- (157.43,154.66);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (161.44,144.73) -- (165.94,149.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (161.44,149.23) -- (165.94,144.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (170.04,135.79) -- (174.54,140.29);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (170.04,140.29) -- (174.54,135.79);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (178.56,145.69) -- (183.06,150.19);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (178.56,150.19) -- (183.06,145.69);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (187.08,154.95) -- (191.58,159.45);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (187.08,159.45) -- (191.58,154.95);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (195.68,143.75) -- (200.18,148.25);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (195.68,148.25) -- (200.18,143.75);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.19,152.67) -- (208.69,157.17);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.19,157.17) -- (208.69,152.67);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (212.71,133.17) -- (217.21,137.67);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (212.71,137.67) -- (217.21,133.17);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (221.31,122.53) -- (225.81,127.03);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (221.31,127.03) -- (225.81,122.53);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (229.82,130.06) -- (234.32,134.56);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (229.82,134.56) -- (234.32,130.06);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (238.42,132.79) -- (242.92,137.29);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (238.42,137.29) -- (242.92,132.79);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (246.94,129.26) -- (251.44,133.76);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (246.94,133.76) -- (251.44,129.26);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (255.46,120.74) -- (259.96,125.24);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (255.46,125.24) -- (259.96,120.74);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (264.06,104.52) -- (268.56,109.02);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (264.06,109.02) -- (268.56,104.52);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (272.57,115.57) -- (277.07,120.07);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (272.57,120.07) -- (277.07,115.57);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (281.09,113.09) -- (285.59,117.59);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (281.09,117.59) -- (285.59,113.09);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (289.69,121.19) -- (294.19,125.69);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (289.69,125.69) -- (294.19,121.19);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (298.20,110.00) -- (302.70,114.50);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (298.20,114.50) -- (302.70,110.00);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (306.81,105.09) -- (311.31,109.59);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (306.81,109.59) -- (311.31,105.09);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (315.32,106.76) -- (319.82,111.26);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (315.32,111.26) -- (319.82,106.76);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.84, 77.89) -- (328.34, 82.39);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.84, 82.39) -- (328.34, 77.89);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (332.35, 81.92) -- (336.85, 86.42);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (332.35, 86.42) -- (336.85, 81.92);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (340.95, 64.23) -- (345.45, 68.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (340.95, 68.73) -- (345.45, 64.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (349.47, 68.14) -- (353.97, 72.64);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (349.47, 72.64) -- (353.97, 68.14);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (358.07, 64.23) -- (362.57, 68.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (358.07, 68.73) -- (362.57, 64.23);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (397.48,252.94);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 52.65, 61.20) -- (350.70, 61.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 52.65, 61.20) -- ( 52.65, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 95.23, 61.20) -- ( 95.23, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (137.81, 61.20) -- (137.81, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (180.38, 61.20) -- (180.38, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (222.96, 61.20) -- (222.96, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (265.54, 61.20) -- (265.54, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (308.12, 61.20) -- (308.12, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (350.70, 61.20) -- (350.70, 55.20);
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 52.65, 39.60) {0};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 95.23, 39.60) {50};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (137.81, 39.60) {100};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (180.38, 39.60) {150};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (222.96, 39.60) {200};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (265.54, 39.60) {250};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (308.12, 39.60) {300};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (350.70, 39.60) {350};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 69.61) -- ( 49.20,176.11);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 69.61) -- ( 43.20, 69.61);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,105.11) -- ( 43.20,105.11);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,140.61) -- ( 43.20,140.61);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,176.11) -- ( 43.20,176.11);
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80, 69.61) {2.0};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,105.11) {2.5};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,140.61) {3.0};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,176.11) {3.5};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 61.20) --
+	(372.28, 61.20) --
+	(372.28,203.75) --
+	( 49.20,203.75) --
+	( 49.20, 61.20);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (397.48,252.94);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (210.74, 15.60) {$t$ (s)};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 10.80,132.47) {$\log(I)$};
+\end{scope}
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (372.28,203.75);
+\definecolor{drawColor}{RGB}{209,95,238}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,202.70) -- (372.29, 73.55);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (297.83,199.47) rectangle (367.44,163.47);
+\definecolor{drawColor}{RGB}{209,95,238}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (300.53,175.47) -- (318.53,175.47);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (307.28,185.22) -- (311.78,189.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (307.28,189.72) -- (311.78,185.22);
+
+\node[text=drawColor,anchor=base west,inner sep=0pt, outer sep=0pt, scale=  1.00] at (327.53,184.03) {Mesures};
+
+\node[text=drawColor,anchor=base west,inner sep=0pt, outer sep=0pt, scale=  1.00] at (327.53,172.03) {Ajust};
+\end{scope}
+\end{tikzpicture}
diff --git a/quad12/labmoderna/p1a/grafiques/fons_fluctuacio.tex b/quad12/labmoderna/p1a/grafiques/fons_fluctuacio.tex
new file mode 100644
index 0000000..22a3fd5
--- /dev/null
+++ b/quad12/labmoderna/p1a/grafiques/fons_fluctuacio.tex
@@ -0,0 +1,211 @@
+% Created by tikzDevice version 0.12.4 on 2023-03-16 22:38:50
+% !TEX encoding = UTF-8 Unicode
+\begin{tikzpicture}[x=1pt,y=1pt]
+\definecolor{fillColor}{RGB}{255,255,255}
+\path[use as bounding box,fill=fillColor,fill opacity=0.00] (0,0) rectangle (361.35,289.08);
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (336.15,239.88);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 57.58,166.80) -- ( 62.08,171.30);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 57.58,171.30) -- ( 62.08,166.80);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 66.71,127.41) -- ( 71.21,131.91);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 66.71,131.91) -- ( 71.21,127.41);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 75.92,170.74) -- ( 80.42,175.24);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 75.92,175.24) -- ( 80.42,170.74);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 85.05,225.89) -- ( 89.55,230.39);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 85.05,230.39) -- ( 89.55,225.89);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 94.27,198.32) -- ( 98.77,202.82);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 94.27,202.82) -- ( 98.77,198.32);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (103.40,139.23) -- (107.90,143.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (103.40,143.73) -- (107.90,139.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (112.52,123.47) -- (117.02,127.97);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (112.52,127.97) -- (117.02,123.47);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (121.74,166.80) -- (126.24,171.30);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (121.74,171.30) -- (126.24,166.80);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (130.87,190.44) -- (135.37,194.94);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (130.87,194.94) -- (135.37,190.44);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (140.00,131.35) -- (144.50,135.85);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (140.00,135.85) -- (144.50,131.35);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (149.22,186.50) -- (153.72,191.00);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (149.22,191.00) -- (153.72,186.50);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (158.34, 99.84) -- (162.84,104.34);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (158.34,104.34) -- (162.84, 99.84);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (167.47,206.20) -- (171.97,210.70);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (167.47,210.70) -- (171.97,206.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (176.69,143.17) -- (181.19,147.67);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (176.69,147.67) -- (181.19,143.17);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (185.82,107.72) -- (190.32,112.22);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (185.82,112.22) -- (190.32,107.72);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (194.94,218.01) -- (199.44,222.51);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (194.94,222.51) -- (199.44,218.01);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.16,151.05) -- (208.66,155.55);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (204.16,155.55) -- (208.66,151.05);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (213.29,162.86) -- (217.79,167.36);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (213.29,167.36) -- (217.79,162.86);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (222.42,111.66) -- (226.92,116.16);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (222.42,116.16) -- (226.92,111.66);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (231.63,139.23) -- (236.13,143.73);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (231.63,143.73) -- (236.13,139.23);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (240.76,143.17) -- (245.26,147.67);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (240.76,147.67) -- (245.26,143.17);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (249.98,119.53) -- (254.48,124.03);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (249.98,124.03) -- (254.48,119.53);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (259.11,174.68) -- (263.61,179.18);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (259.11,179.18) -- (263.61,174.68);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (268.23, 95.90) -- (272.73,100.40);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (268.23,100.40) -- (272.73, 95.90);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (277.45,198.32) -- (281.95,202.82);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (277.45,202.82) -- (281.95,198.32);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (286.58,186.50) -- (291.08,191.00);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (286.58,191.00) -- (291.08,186.50);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (295.71,178.62) -- (300.21,183.12);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (295.71,183.12) -- (300.21,178.62);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (304.93,162.86) -- (309.43,167.36);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (304.93,167.36) -- (309.43,162.86);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (314.05, 84.08) -- (318.55, 88.58);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (314.05, 88.58) -- (318.55, 84.08);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.27,158.93) -- (327.77,163.43);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (323.27,163.43) -- (327.77,158.93);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (361.35,289.08);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 50.70, 61.20) -- (324.52, 61.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 50.70, 61.20) -- ( 50.70, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 96.34, 61.20) -- ( 96.34, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (141.97, 61.20) -- (141.97, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (187.61, 61.20) -- (187.61, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (233.25, 61.20) -- (233.25, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (278.88, 61.20) -- (278.88, 55.20);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] (324.52, 61.20) -- (324.52, 55.20);
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 50.70, 39.60) {0};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 96.34, 39.60) {50};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (141.97, 39.60) {100};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (187.61, 39.60) {150};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (233.25, 39.60) {200};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (278.88, 39.60) {250};
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (324.52, 39.60) {300};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 71.76) -- ( 49.20,229.32);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 71.76) -- ( 43.20, 71.76);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,111.15) -- ( 43.20,111.15);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,150.54) -- ( 43.20,150.54);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,189.93) -- ( 43.20,189.93);
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20,229.32) -- ( 43.20,229.32);
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80, 71.76) {-2};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,111.15) {-1};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,150.54) {0};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,189.93) {1};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 34.80,229.32) {2};
+
+\path[draw=drawColor,line width= 0.4pt,line join=round,line cap=round] ( 49.20, 61.20) --
+	(336.15, 61.20) --
+	(336.15,239.88) --
+	( 49.20,239.88) --
+	( 49.20, 61.20);
+\end{scope}
+\begin{scope}
+\path[clip] (  0.00,  0.00) rectangle (361.35,289.08);
+\definecolor{drawColor}{RGB}{0,0,0}
+
+\node[text=drawColor,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at (192.68, 15.60) {$t$ (s)};
+
+\node[text=drawColor,rotate= 90.00,anchor=base,inner sep=0pt, outer sep=0pt, scale=  1.00] at ( 10.80,150.54) {$I$ (\#/s)};
+\end{scope}
+\begin{scope}
+\path[clip] ( 49.20, 61.20) rectangle (336.15,239.88);
+\definecolor{drawColor}{RGB}{255,0,0}
+
+\path[draw=drawColor,line width= 0.4pt,dash pattern=on 4pt off 4pt ,line join=round,line cap=round] ( 49.20,195.15) -- (336.15,195.15);
+
+\path[draw=drawColor,line width= 0.4pt,dash pattern=on 4pt off 4pt ,line join=round,line cap=round] ( 49.20,120.64) -- (336.15,120.64);
+\definecolor{drawColor}{RGB}{0,255,0}
+
+\path[draw=drawColor,line width= 0.4pt,dash pattern=on 4pt off 4pt ,line join=round,line cap=round] ( 49.20,157.89) -- (336.15,157.89);
+\end{scope}
+\end{tikzpicture}
diff --git a/quad12/labmoderna/p1a/main.tex b/quad12/labmoderna/p1a/main.tex
new file mode 100644
index 0000000..bb86ff2
--- /dev/null
+++ b/quad12/labmoderna/p1a/main.tex
@@ -0,0 +1,132 @@
+\documentclass[a4paper, 11pt]{article}
+
+\input{preamble.tex}
+\addbibresource{references.bib}
+
+\rhead{Adrià Vilanova Martínez i Diana Tur Otero}
+\lhead{Pràctica 1a}
+\fancyfoot[C]{\thepage}
+
+\setlength{\droptitle}{-4em}
+\title{Pràctica 1a. Determinació de la semivida d'un radionúclid.}
+\author{Adrià Vilanova Martínez i Diana Tur Otero}
+\date{Divendres 10 de març de 2023}
+
+\begin{document}
+
+{
+  \parskip = 0pt
+  \maketitle
+}
+
+\section{Objectiu}
+Determinar el temps de semivida del \ch{^{137m}Ba} i comparar-lo amb un valor trobat a la literatura.
+
+\section{Metodologia}
+En desexcitar-se a l'estat fonamental, el \ch{^{137m}Ba} emet un fotó gamma, que detectem mitjançant un detector d'escintil·lacions. Així doncs, realitzant mesures d'aquesta radiació emesa en funció del temps i fent un ajust de les dades obtingudes a la llei de desintegració radioactiva
+\begin{equation}
+    N(t) = N_0 \exp( -t/\tau )
+    \label{eq:llei_desintegracio}
+\end{equation}
+–on $N$ és el nombre d'àtoms excitats– es pot obtenir el valor de la vida mitjana $\tau$.\footnote{Realment, nosaltres no mesurem tots els fotons emesos per les desintegracions gamma, només els que es dirigeixen cap el detector. Tot i així, com la direcció cap on surten és uniforme (no n'hi ha cap privilegiada), el que sí sabem és que el valor d'impulsos que mesurarem, $I$, serà proporcional a $N$ i, per tant, $\frac{N(t)}{N_0} = \frac{I(t)}{I_0}$.}
+
+La semivida $T_{1/2}$ és el temps en què la meitat dels àtoms han decaigut a l'estat fonamental, així que la seva expressió en funció dels paràmetres trobats a l'ajust és:
+\begin{equation}
+    \frac{N_0}{2} = N_0 \exp\left( \frac{-T_{1/2}}{\tau} \right) \implies \log\left( \frac{1}{2} \right) = \frac{- T_{1/2}}{\tau} \implies T_{1/2} = \tau \log(2).
+    \label{eq:semivida}
+\end{equation}
+
+Al llarg de l'experiment, degut al fet que aquest no està aïllat de la resta de l'Univers, el detector d'escintil·lacions rep radiació de fons que s'afegeix als fotons que volem detectar. Així doncs, abans de començar-lo hem mesurat el nivell del fons (com a una mitjana d'impulsos per segon) durant $\qty{5}{\minute}$ per tal de restar-lo de les mesures obtingudes a l'experiment. Hem utilitzat una opció del software de mesura \textit{measure} que ja ho resta automàticament per no haver-ho de fer durant el postprocessat de les dades.
+
+A més, per tal d'obtenir la mostra de \ch{^{137m}Ba} hem utilitzat un minigenerador, que és un recipient amb \ch{^{137}Cs}, que decau a \ch{^{137m}Ba} amb un temps de semivida de l'ordre de 30 anys. Fent passar pel minigenerador (molt poc a poc) una dissolució d'\ch{HCl}, a la sortida obtenim la dissolució amb àtoms de bari, ja que el bari és dissol amb l'àcid clorhídric però el cesi no.
+
+\section{Figures i valors obtinguts}
+D'acord amb el que hem explicat a la secció anterior, primer hem mesurat el fons durant $\qty{300}{\second}$. Això ens ha donat el següent valor mitjà d'impulsos per segon:
+\[ I_\text{fons} = \qty{19.333}{\#\per\second}. \]
+
+Posteriorment, tal com suggereix el guió de la pràctica, hem pres més mesures del fons amb l'opció activada de restar el valor mitjà del fons que hem obtingut anteriorment. Això ho hem fet en intervals de \qty{10}{\second} durant \qty{5}{\minute}. Els valors obtinguts es poden veure a la taula \ref{table:fons} i representats a la figura \ref{fig:fons}.
+
+\begin{figure}
+    \centering
+    \includegraphics[trim=0 0.45cm 0 1.5cm]{grafiques/fons_fluctuacio.tex}
+    \caption{Impulsos per segon rebuts sense cap font en cada finestra de 10 segons havent restat la mitjana d'impulsos per segon mesurada del fons. La mitjana està representada per la línia verda del mig i la desviació estàndard per les línies vermelles.}
+    \label{fig:fons}
+\end{figure}
+
+Aquesta darrera mesura ens permet calcular la incertesa deguda a la fluctuació del fons aproximant-la com la desviació estàndard dels valors obtinguts:
+\[ (\delta I)_\text{fluct. fons} = \qty{0.9}{\#\per\second}. \]
+
+La mitjana doncs és $\qty{0.2(9)}{\#\per\second}$, que és compatible amb el valor de 0 que idealment hauríem de veure.
+
+\begin{figure}
+    \centering
+    \includegraphics[trim=0 0.45cm 0 1.5cm]{grafiques/bari.tex}
+    \caption{Nombre de desintegracions gamma detectades per segon en cada finestra de 10 segons.}
+    \label{fig:bari}
+\end{figure}
+
+Finalment, després d'aquesta calibratge, hem munyit el bari i hem fet la mesura amb la mostra de bari. Els valors mesurats es poden veure a la taula \ref{table:bari} i a la figura \ref{fig:bari}.
+
+Ajustant l'equació $I = I_0 \exp(- t/\tau)$ a les mesures tal com hem explicat anteriorment obtenim els següents paràmetres:
+\[
+    \begin{cases}
+        I_0 = \qty{45.8(12)}{\#\per\second}, \\
+        \tau = \qty{220(10)}{\second}.
+    \end{cases}
+\]
+
+Per tant, utilitzant (\ref{eq:semivida}), el temps de semivida del \ch{^{137m}Ba} és:
+\[ T_{1/2} = \tau \log(2) = \qty{153(7)}{\second} = \qty{2.54(12)}{\minute}. \]
+
+A \cite{nubase} s'ha mesurat el temps de semivida com $\qty{2.552(1)}{\minute}$, que és un valor compatible amb el nostre resultat.
+
+Alternativament a l'ajust exponencial que hem realitzat mitjançant el mètode de mínims quadrats, també podem obtenir el valor del temps de semivida fent una regressió lineal si fem la següent transformació de l'equació (\ref{eq:llei_desintegracio}):
+\[
+    I(t) = I_0 \exp\left( \frac{-t}{\tau} \right) \implies \log(I(t)) = \log(I_0) - \frac{1}{\tau} t.
+\]
+
+\begin{figure}
+    \centering
+    \includegraphics[trim=0 0.45cm 0 1.5cm]{grafiques/bari_linealitzat.tex}
+    \caption{Regressió lineal amb les mesures de les desintegracions gamma del bari.}
+    \label{fig:bari_linealitzat}
+\end{figure}
+
+D'aquesta manera, fent la regressió de $t \sim \log(I)$ obtindrem que la pendent de la recta ajustada és la nostra estimació de $-1/\tau$. La constant de decaïment és $\lambda \equiv 1/\tau$, així que la pendent és directament $-\lambda$.
+
+En fer la regressió lineal (veure la figura \ref{fig:bari_linealitzat}), obtenim els següents paràmetres:
+\[
+    \begin{cases}
+        \log(I_0) = 3.85 \pm 0.04, \\
+        \lambda = \qty{0.0048(2)}{\per\second}.
+    \end{cases}
+\]
+
+\clearpage
+
+\section{Taules de dades}
+\begin{multicols}{2}
+    \begin{center}
+      \pgfplotstabletypeset[
+        columns={t, ImpulsesPerSecond},
+        columns/t/.style={read comma as period, column name={$t \pm 0.1$ (s)}, fixed, fixed zerofill, precision=1},
+        columns/ImpulsesPerSecond/.style={read comma as period, column name={$I \pm 0.01$ (\#/s)}, fixed, fixed zerofill, precision=2}
+      ]{dades/fons_a.txt}
+      \captionof{table}{Mesures del fons en impulsos per segon havent restat el valor mitjà del fons.}
+      \label{table:fons}
+    \end{center}
+
+    \begin{center}
+      \pgfplotstabletypeset[
+        columns={t, ImpulsesPerSecond},
+        columns/t/.style={read comma as period, column name={$t \pm 0.1$ (s)}, fixed, fixed zerofill, precision=1},
+        columns/ImpulsesPerSecond/.style={read comma as period, column name={$I \pm 0.01$ (\#/s)}, fixed, fixed zerofill, precision=2}
+      ]{dades/bari_a.txt}
+      \captionof{table}{Mesures del impulsos per segon rebuts de la font de bari.}
+      \label{table:bari}
+    \end{center}
+\end{multicols}
+
+\printbibliography
+
+\end{document}
diff --git a/quad12/labmoderna/p1a/preamble.tex b/quad12/labmoderna/p1a/preamble.tex
new file mode 100644
index 0000000..363f6d6
--- /dev/null
+++ b/quad12/labmoderna/p1a/preamble.tex
@@ -0,0 +1,81 @@
+% !TEX root = main.tex
+\usepackage[utf8]{inputenc}
+\usepackage[catalan]{babel}
+\usepackage{fancyhdr}
+\usepackage{graphicx}
+\usepackage[labelfont=bf, font=small]{caption}
+\usepackage{siunitx}
+\usepackage{geometry}
+\geometry{
+  margin=20mm,
+  heightrounded
+}
+\usepackage{amsmath}
+\usepackage{amsfonts}
+\usepackage{booktabs}
+\usepackage{chemformula}
+\usepackage{hyperref}
+\usepackage[style=english]{csquotes}
+\usepackage{biblatex}
+\usepackage{pgfplotstable}
+\usepackage{adjustbox}
+\usepackage{array}
+\usepackage{float}
+\usepackage{stackengine}
+\usepackage{titling}
+\usepackage{algpseudocode}
+\usepackage{xcolor}
+\usepackage{multicol}
+\usepackage{gincltex}
+
+\newcolumntype{L}[1]{>{\raggedright\let\newline\\\arraybackslash\hspace{0pt}}m{#1}}
+\newcolumntype{C}[1]{>{\centering\let\newline\\\arraybackslash\hspace{0pt}}m{#1}}
+\newcolumntype{R}[1]{>{\raggedleft\let\newline\\\arraybackslash\hspace{0pt}}m{#1}}
+
+\pgfplotsset{compat=1.16}
+\pgfplotstableset{
+  empty cells with={--}, % replace empty cells with ’--’
+  every head row/.style={before row=\toprule,after row=\midrule},
+  every last row/.style={after row=\bottomrule},
+  set thousands separator={\,}%,
+}
+\sisetup{separate-uncertainty=true}
+\setlength{\parskip}{1em}
+\pagestyle{fancy}
+\fancyhf{}
+
+% Plantilles del notate
+\def\myupbracefill#1{\rotatebox{90}{\stretchto{\{}{#1}}}
+\def\rlwd{.5pt}
+\newcommand\notate[4][B]{%
+  \if B#1\else\def\myupbracefill##1{}\fi%
+  \def\useanchorwidth{T}%
+  \setbox0=\hbox{$\displaystyle#2$}%
+  \def\stackalignment{c}\stackunder[-6pt]{%
+    \def\stackalignment{c}\stackunder[-1.5pt]{%
+      \stackunder[2pt]{\strut $\displaystyle#2$}{\myupbracefill{\wd0}}}{%
+    \rule{\rlwd}{#3\baselineskip}}}{%
+  \strut\kern9pt$\rightarrow$\smash{\rlap{$~#4$}}}%
+}
+\newcommand\lnotate[4][B]{%
+  \if B#1\else\def\myupbracefill##1{}\fi%
+  \def\useanchorwidth{T}%
+  \setbox0=\hbox{$\displaystyle#2$}%
+  \def\stackalignment{c}\stackunder[-6pt]{%
+    \def\stackalignment{c}\stackunder[-1.5pt]{%
+      \stackunder[2pt]{\strut $\displaystyle#2$}{\myupbracefill{\wd0}}}{%
+    \rule{\rlwd}{#3\baselineskip}}}{%
+  \strut\kern-9pt$\leftarrow$\smash{\llap{$~#4\quad\;\,$}}}%
+}
+
+\newcommand{\Ham}{\mathcal{H}}
+
+\definecolor{CommentGray}{gray}{0.5}
+\algrenewcommand\algorithmiccomment[1]{{\color{CommentGray} \hfill\(\triangleright\) #1}}%
+
+% To prevent underfull/overfull messages in bibliography
+\usepackage{etoolbox}
+\apptocmd{\sloppy}{\hbadness 10000\relax}{}{}
+
+\usepackage{enumitem}
+\setlist{nolistsep}
diff --git a/quad12/labmoderna/p1a/r/.gitignore b/quad12/labmoderna/p1a/r/.gitignore
new file mode 100644
index 0000000..01564af
--- /dev/null
+++ b/quad12/labmoderna/p1a/r/.gitignore
@@ -0,0 +1 @@
+*.tex
diff --git a/quad12/labmoderna/p1a/r/main.r b/quad12/labmoderna/p1a/r/main.r
new file mode 100644
index 0000000..151853a
--- /dev/null
+++ b/quad12/labmoderna/p1a/r/main.r
@@ -0,0 +1,14 @@
+library(tikzDevice)
+
+table <- read.table('../dades/fons_a.txt', sep="\t", dec=',', header=TRUE)
+m = mean(table$ImpulsesPerSecond)
+m
+unc = sd(table$ImpulsesPerSecond)
+unc
+
+tikz("fons_fluctuacio.tex", width = 5, height = 4)
+plot(table$t, table$ImpulsesPerSecond, pch = 4, xlab = "$t$ (s)", ylim = c(-2.1, 2.1), ylab = "$I$ (\\#/s)")
+abline(h = m + unc, col = "red", lty = 2)
+abline(h = m - unc, col = "red", lty = 2)
+abline(h = m, col = "green", lty = 2)
+dev.off()
diff --git a/quad12/labmoderna/p1a/r/main2.r b/quad12/labmoderna/p1a/r/main2.r
new file mode 100644
index 0000000..76b4fff
--- /dev/null
+++ b/quad12/labmoderna/p1a/r/main2.r
@@ -0,0 +1,25 @@
+library(tikzDevice)
+
+table <- read.table('../dades/bari_a.txt', sep="\t", dec=',', header=TRUE)
+
+fit <- nls(ImpulsesPerSecond ~ ni*exp(-t/tau), start = list(ni = 40, tau = 20), data = table)
+summary(fit)
+
+tikz("bari.tex", width = 5.5, height = 3.5)
+#pdf('pdf.pdf', width = 6, height = 4)
+fit_coef <- coef(fit)
+plot(table$t, table$ImpulsesPerSecond, pch = 4, xlab = "$t$ (s)", ylab = "$I$ (\\# s\\textsuperscript{-1})")
+curve(fit_coef[1]*exp(-x/fit_coef[2]), col = "mediumorchid2", add = TRUE)
+legend("topright", inset = c(0.015, 0.03),col = c("black", "mediumorchid2"), legend = c("Mesures", "Ajust"), pch=c(4, NA), lty=c(NA, 1))
+dev.off()
+
+table$logI <- log(table$ImpulsesPerSecond)
+
+tikz("bari_linealitzat.tex", width = 5.5, height = 3.5)
+#pdf('pdf2.pdf', width = 6, height = 4)
+fit_lineal <- lm(logI~t, data = table)
+summary(fit_lineal)
+plot(table$t, table$logI, pch = 4, xlab = "$t$ (s)", ylab = "$\\log(I)$")
+abline(fit_lineal, col = "mediumorchid2")
+legend("topright", inset = c(0.015, 0.03),col = c("black", "mediumorchid2"), legend = c("Mesures", "Ajust"), pch=c(4, NA), lty=c(NA, 1))
+dev.off()