LaTeX Forum

\documentclass[a4paper, 12pt]{article}
\usepackage[utf8]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[english]{babel}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage[left= 3 cm, right= 3 cm]{geometry}
\usepackage[onehalfspacing]{setspace}
\usepackage[]{mcode}

\begin{document}

\section{1,2,3,4}

MATLAB code:
\begin{lstlisting}
clear all
syms q1 q2 q3 q4 c
sol = solve('0.5*(1-q2-q3-q4-c)=q1','0.5*(1-q1-q3-q4-c)=q2','0.5*(1-q1-q2-q4-c-0.1)=q3','0.5*(1-q1-q2-q3-c-0.1)=q4')
pretty(sol.q1)
q=(2*(0.24-0.2*c)+2*(0.14-0.2*c)
p=1-q
qi=0.24-0.2*c
qj=0.14-0.2*c
profit=(1-q-c)*qi+(1-q-c-0.1)*qj
CS=0.5*q^2
\end{lstlisting}

\section{12,3,4}
\begin{lstlisting}
clear all
syms q12 q3 q4 c
sol = solve('0.5*(0.9-q3-q4-0.5*c)=q12','0.5*(1-q12-q4-c)=q3','0.5*(1-q12-q3-c)=q4')
pretty(sol.q12)
% For firm 12
q2=((0.125*c+0.175)+2*(0.275-0.375*c))
q1=((0.125*c+0.3)+2*(0.2-0.375*c))
p=1-q2
qi=0.125*c+0.3
qj=0.125*c+0.175
profit12=(1-q1-0.5*c)*qi+(0.9-q2-0.5*c)*qj
% for firm 3 and 4
q3i=0.2-0.375*c
q3j=0.275-0.375*c
profit3=(0.9-q1-c)*q3i+(1-q2-c)*q3j
CS=0.5*q1^2
\end{lstlisting}

\section{1,2,34}
\begin{lstlisting}
clear all
syms q1 q2 q34 c
sol = solve('0.5*(0.9-q2-q34-c)=q1','0.5*(0.9-q1-q34-c)=q2','0.5*(1-q1-q2-0.5*c)=q34')
pretty(sol.q1)
% For firm 1,2
q2=((0.125*c+0.3)+2*(0.2-0.375*c))
q1=((0.125*c+0.175)+2*(0.275-0.375*c))
p=1-q1
qi=0.275-0.375*c
qj=0.2-0.375*c
profit1=(1-q1-c)*qi+(0.9-q2-c)*qj
% for firm 34
q34i=0.125*c+0.175
q34j=0.125*c+0.3
profit34=(0.9-q1-0.5*c)*q34i+(1-q2-0.5*c)*q34j
CS=0.5*q1^2
\end{lstlisting}

\section{13,2,4}

\begin{lstlisting}
clear all
syms q13 q2 q4 c
sol = solve('0.5*(1-q2-q4-0.5*c)=q13','0.5*(0.9-q13-q4-c)=q2','0.5*(1-q13-q2-c)=q4')
pretty(sol.q13)
q=((0.125*c+0.275)+(0.275-0.375*c)+(0.175-0.375*c))
p=1-q
% For firm 13
q13i=0.125*c+0.275
profit13=(1-q-0.5*c)*q13i+(1-q-0.5*c)*q13i
% for firm 2 and 4
q2i=0.275-0.375*c
q2j=0.175-0.375*c
profit2=(1-q-c)*q2i+(0.9-q-c)*q2j
CS=0.5*q^2
\end{lstlisting}

\section{12,34}
\begin{lstlisting}
clear all
syms q12 q34 c
sol = solve('0.5*(1-q34-0.5*c)=q12','0.5*(0.9-q12-0.5*c)=q34')
pretty(sol.q12)
q=((11/30-1/6*c)+(4/15-1/6*c))
p=1-q
% For firm 12 and 34
qi=11/30-1/6*c
qj=4/15-1/6*c
profit12=(1-q-0.5*c)*qi+(0.9-q-0.5*c)*qj
CS=0.5*q^2
\end{lstlisting}

\section{13,24}
\begin{lstlisting}
clear all
syms q13 q24 c
sol = solve('0.5*(1-q24-0.5*c)=q13','0.5*(1-q13-0.5*c)=q24')
pretty(sol.q13)
q=(2*(1/3-1/6*c))
p=1-q
% For firm 13 and 24
qij=1/3-1/6*c
profit13=(1-q-0.5*c)*qij+(1-q-0.5*c)*qij
CS=0.5*q^2
\end{lstlisting}

\section{123,4}
\begin{lstlisting}
clear all
syms q123 q4 c
sol = solve('0.5*(1-q4-1/3*c)=q123','0.5*(1-q123-c)=q4')
pretty(sol.q123)
q1=((1/9*c+11/30)+(4/15-5/9*c))
q2=((1/9*c+1/3)+(1/3-5/9*c))
p1=1-q1
p2=1-q2
% For firm 123
q123i=1/9*c+11/30
q123j=1/9*c+1/3
profit123=(1-q1-1/3*c)*q123i+(1-q2-1/3*c)*q123j
% For firm 4
q4i=4/15-5/9*c
q4j=1/3-5/9*c
profit4=(0.9-q1-c)*q4i+(1-q2-c)*q4j
CS=0.5*q1^2
\end{lstlisting}

\section{134,2}
\begin{lstlisting}
clear all
syms q134 q2 c
sol = solve('0.5*(1-q2-1/3*c)=q134','0.5*(1-q134-c)=q2')
pretty(sol.q134)
q2=((1/9*c+11/30)+(4/15-5/9*c))
q1=((1/9*c+1/3)+(1/3-5/9*c))
p1=1-q1
p2=1-q2
% For firm 134
q134j=1/9*c+11/30
q134i=1/9*c+1/3
profit123=(1-q1-1/3*c)*q134i+(1-q2-1/3*c)*q134j
% For firm 2
q2j=4/15-5/9*c
q2i=1/3-5/9*c
profit4=(0.9-q1-c)*q2i+(1-q2-c)*q2j
CS=0.5*q1^2
\end{lstlisting}

\end{document}