this is for holding javascript data
Radovan Omorjan edited seminarskicsv.tex
over 7 years ago
Commit id: 0abf09ef71e1be8f9f8ba6fb08eb7541b9ff80f6
deletions | additions
diff --git a/seminarskicsv.tex b/seminarskicsv.tex
index ef8abe6..daa7ef3 100644
--- a/seminarskicsv.tex
+++ b/seminarskicsv.tex
...
\pagebreak{}
\section{Primena R u statističkoj kontroli procesa}
U ovom radu je prikazana primena programskog jezika R u programskom
okruženju RStudio \cite{R-Core-Team:2015aa} u statističkoj kontroli
kvaliteta proizvodnog procesa proizvodnje čokoladiranih štanglica,
koje se proizvode kontinualno na proizvodnoj liniji Conbar.
Penasta masa dobijena aeracijom ukuvanog šećerno-skrobnog sirupa i
sredstva za stvaranje pene mešanjem sa masnim premiksom formira se
na ohlađenim valjcima u vidu sloja zadate debljine. Nakon prolaska
kroz tunel za hlađenje penasti sloj se seče najpre uzdužno kružnim
noževima, zatim poprečno formirajući štanglice zadate dužine koje
se u sledećoj fazi prelivaju čokoladom, hlade i pakuju.
Prema postojećem planu kontrolisanja svakog sata tokom osmočasovnog
proizvodnog procesa se uzima uzorak od 10 komada gotovog proizvoda,
nazivne mase 30g, izmeri masa svake pojedinačne štanglice na overenoj
vagi, izmerena vrednost se beleži u kontrolnoj listi, izračuna srednja
vrednost i na osnovu tih podataka se donosi odluka o prihvatanju ili
odbacivanju proizvodnje tokom sat vremena, prema zahtevima Pravilnika
o prethodno upakovanim proizvodima \cite{pravilnik}.
Na osnovu dosadašnjih iskustava, u cilju smanjenja rizika neprihvatanja
proizvodnog lota, proizvodni proces je vođen na način da verovatnoća
nastajanja neadekvatnog proizvoda bude veoma mala što za posledicu
ima da je srednja vrednost veća za 1-2 g od nazivne mase što ujedno
vodi do neprofitabilnosti proizvodnje što se podudara sa zaključcima
autora Djekić i ost. \cite{Djekic2014}.
Cilj ovog rada je da se primenom statističkih metoda u programskom
jeziku R odrede optimalni parametri procesa.
Radi prikaza stanja proizvodnog procesa analizirane su prethodna merenja
iz dužeg vremenskog perioda. Analiza procesa je urađena na osnovu
100 uzoraka obima 10.
Za analizu podataka su korišćeni različiti paketi koji se u programskom
okruženju \texttt{R} aktiviraju sa funkcijom \texttt{library()}\texttt{\textbf{
}}\cite{qcc,knitr,Wickham:2007aa,cano2012six,cano2015quality,Dahl:2016aa}
\begin{knitrout}\footnotesize
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlkwd{library}\hlstd{(}\hlstr{"reshape2"}\hlstd{)}
\hlkwd{library}\hlstd{(}\hlstr{"qcc"}\hlstd{)}
\hlkwd{library}\hlstd{(}\hlstr{"SixSigma"}\hlstd{)}
\hlkwd{library}\hlstd{(}\hlstr{"knitr"}\hlstd{)}
\hlkwd{library}\hlstd{(}\hlstr{"xtable"}\hlstd{)}
\hlkwd{library}\hlstd{(}\hlstr{"AcceptanceSampling"}\hlstd{)}
\hlkwd{options}\hlstd{(}\hlkwc{scipen}\hlstd{=}\hlnum{999}\hlstd{)}
\hlstd{opts_chunk}\hlopt{$}\hlkwd{set}\hlstd{(}\hlkwc{size}\hlstd{=}\hlstr{"footnotesize"}\hlstd{)}
\hlkwd{qcc.options}\hlstd{(}\hlkwc{cex}\hlstd{=}\hlnum{0.6}\hlstd{,}\hlkwc{cex.stats}\hlstd{=}\hlnum{0.6}\hlstd{)}
\end{alltt}
\end{kframe}
\end{knitrout}
Prikupljeni rezultati merenja su uneti u excel tabelu i sačuvani u
obliku csv fajla. Pomoću funkcije \texttt{read.csv()} podaci su učitani
u programsko okruženje RStudio.
\begin{knitrout}\footnotesize
\definecolor{shadecolor}{rgb}{0.969, 0.969, 0.969}\color{fgcolor}\begin{kframe}
\begin{alltt}
\hlstd{masa.data} \hlkwb{<-} \hlkwd{read.csv}\hlstd{(}\hlstr{"kidypre.csv"}\hlstd{)}
\end{alltt}
\end{kframe}
\end{knitrout}
\subsection{Deskriptivna statistika}
Učitani podaci se moraju prilagoditi za korišćenje u različitim paketima,