annotate scripts/generate_report.py @ 1946:1d08f8aee098

Merge WAC paper
author Dave Moffat <me@davemoffat.com>
date Thu, 24 Sep 2015 09:52:08 +0100
parents 4988c805ff9e
children 17b550310734 235594325b84
rev   line source
me@1942 1 #!/usr/bin/python
me@1942 2 # -*- coding: utf-8 -*-
me@1942 3
me@1942 4 import xml.etree.ElementTree as ET
me@1942 5 import os # for getting files from directory
me@1942 6 import operator # for sorting data with multiple keys
me@1942 7 import sys # for accessing command line arguments
me@1942 8 import subprocess # for calling pdflatex
me@1942 9 import shlex # for calling pdflatex
me@1942 10 import matplotlib.pyplot as plt # plots
me@1942 11 import numpy as np # numbers
me@1942 12
me@1942 13 # Command line arguments
me@1942 14 assert len(sys.argv)<4, "evaluation_stats takes at most 2 command line argument\n"+\
me@1942 15 "Use: python generate_report.py [results_folder] [no_render | -nr]"
me@1942 16
me@1942 17 render_figures = True
me@1942 18
me@1942 19 # XML results files location
me@1942 20 if len(sys.argv) == 1:
me@1942 21 folder_name = "../saves" # Looks in 'saves/' folder from 'scripts/' folder
me@1942 22 print "Use: python generate_report.py [results_folder] [no_render | -nr]"
me@1942 23 print "Using default path: " + folder_name
me@1942 24 elif len(sys.argv) == 2:
me@1942 25 folder_name = sys.argv[1] # First command line argument is folder
me@1942 26 elif len(sys.argv) == 3:
me@1942 27 folder_name = sys.argv[1] # First command line argument is folder
me@1942 28 assert sys.argv[2] in ('no_render','-nr'), "Second argument not recognised. \n" +\
me@1942 29 "Use: python generate_report.py [results_folder] [no_render | -nr]"
me@1942 30 # Second command line argument is [no_render | -nr]
me@1942 31 render_figures = False
me@1942 32
me@1942 33 def isNaN(num):
me@1942 34 return num != num
me@1942 35
me@1942 36 # Turn number of seconds (int) to '[minutes] min [seconds] s' (string)
me@1942 37 def seconds2timestr(time_in_seconds):
me@1942 38 if time_in_seconds is not None and not isNaN(time_in_seconds):
me@1942 39 time_in_minutes = int(time_in_seconds/60)
me@1942 40 remaining_seconds = int(time_in_seconds%60)
me@1942 41 return str(time_in_minutes) + " min " + str(remaining_seconds) + " s"
me@1942 42 else:
me@1942 43 return 'N/A'
me@1942 44
me@1942 45 # stats initialisation
me@1942 46 number_of_XML_files = 0
me@1942 47 number_of_pages = 0
me@1942 48 number_of_fragments = 0
me@1942 49 total_empty_comments = 0
me@1942 50 total_not_played = 0
me@1942 51 total_not_moved = 0
me@1942 52 time_per_page_accum = 0
me@1942 53
me@1942 54 # arrays initialisation
me@1942 55 page_names = []
me@1942 56 real_page_names = [] # regardless of differing numbers of fragments
me@1942 57 subject_count = [] # subjects per audioholder name
me@1942 58 page_count = []
me@1942 59 duration_page = [] # duration of experiment in function of page content
me@1942 60 duration_order = [] # duration of experiment in function of page number
me@1942 61 fragments_per_page = [] # number of fragments for corresponding page
me@1942 62
me@1942 63 # survey stats
me@1942 64 gender = []
me@1942 65 age = []
me@1942 66
me@1942 67 # get username if available
me@1942 68 for name in ('LOGNAME', 'USER', 'LNAME', 'USERNAME'):
me@1942 69 user = os.environ.get(name)
me@1942 70 if user:
me@1942 71 break
me@1942 72 else:
me@1942 73 user = ''
me@1942 74
me@1942 75
me@1942 76 # begin LaTeX document
me@1942 77 header = r'''\documentclass[11pt, oneside]{article}
me@1942 78 \usepackage{geometry}
me@1942 79 \geometry{a4paper}
me@1942 80 \usepackage[parfill]{parskip} % empty line instead of indent
me@1942 81 \usepackage{graphicx} % figures
me@1942 82 \usepackage{hyperref}
me@1942 83 \usepackage{tikz} % pie charts
me@1942 84 \title{Report}
me@1942 85 \author{'''+\
me@1942 86 user+\
me@1942 87 r'''}
me@1942 88 \graphicspath{{'''+\
me@1942 89 folder_name+\
me@1942 90 r'''/}}
me@1942 91 %\setcounter{section}{-1} % Summary section 0 so number of sections equals number of files
me@1942 92 \begin{document}
me@1942 93 \maketitle
me@1942 94 This is an automatically generated report using the `generate\_report.py' Python script
me@1942 95 included with the Web Audio Evaluation Tool \cite{WAET} distribution which can be found
me@1942 96 at \texttt{code.soundsoftware.ac.uk/projects/webaudioevaluationtool}.
me@1942 97 \tableofcontents
me@1942 98
me@1942 99 '''
me@1942 100
me@1942 101 footer = '\n\t\t'+r'''\begin{thebibliography}{9}
me@1942 102 \bibitem{WAET} % reference to accompanying publication
me@1942 103 Nicholas Jillings, Brecht De Man, David Moffat and Joshua D. Reiss,
me@1942 104 ``Web Audio Evaluation Tool: A browser-based listening test environment,''
me@1942 105 presented at the 12th Sound and Music Computing Conference, July 2015.
me@1942 106 \end{thebibliography}
me@1942 107 \end{document}'''
me@1942 108
me@1942 109 body = ''
me@1942 110
me@1942 111 # generate images for later use
me@1942 112 if render_figures:
me@1942 113 subprocess.call("python timeline_view_movement.py "+folder_name, shell=True)
me@1942 114 subprocess.call("python score_parser.py "+folder_name, shell=True)
me@1942 115 subprocess.call("python score_plot.py "+folder_name, shell=True)
me@1942 116
me@1942 117 # get every XML file in folder
me@1942 118 files_list = os.listdir(folder_name)
me@1942 119 for file in files_list: # iterate over all files in files_list
me@1942 120 if file.endswith(".xml"): # check if XML file
me@1942 121 number_of_XML_files += 1
me@1942 122 tree = ET.parse(folder_name + '/' + file)
me@1942 123 root = tree.getroot()
me@1942 124
me@1942 125 # PRINT name as section
me@1942 126 body+= '\n\section{'+file[:-4].capitalize()+'}\n' # make section header from name without extension
me@1942 127
me@1942 128 # reset for new subject
me@1942 129 total_duration = 0
me@1942 130 page_number = 0
me@1942 131
me@1942 132 individual_table = '\n' # table with stats for this individual test file
me@1942 133 timeline_plots = '' # plots of timeline (movements and plays)
me@1942 134
me@1942 135 # DEMO survey stats
me@1942 136 # get gender
me@1942 137 this_subjects_gender = root.find("./posttest/radio/[@id='gender']")
me@1942 138 if this_subjects_gender is not None:
me@1942 139 gender.append(this_subjects_gender.get("name"))
me@1942 140 else:
me@1942 141 gender.append('UNAVAILABLE')
me@1942 142 # get age
me@1942 143 this_subjects_age = root.find("./posttest/number/[@id='age']")
me@1942 144 if this_subjects_age is not None:
me@1942 145 age.append(this_subjects_age.text)
me@1942 146 #TODO add plot of age
me@1942 147
me@1942 148 # get list of all page names
me@1942 149 for audioholder in root.findall("./audioholder"): # iterate over pages
me@1942 150 page_name = audioholder.get('id') # get page name
me@1942 151
me@1942 152 if page_name is None: # ignore 'empty' audio_holders
me@1942 153 print "WARNING: " + file + " contains empty audio holder. (evaluation_stats.py)"
me@1942 154 break # move on to next
me@1942 155
me@1942 156 number_of_comments = 0 # for this page
me@1942 157 number_of_missing_comments = 0 # for this page
me@1942 158 not_played = [] # for this page
me@1942 159 not_moved = [] # for this page
me@1942 160
me@1942 161 if audioholder.find("./metric/metricresult[@id='testTime']") is not None: # check if time is included
me@1942 162 # 'testTime' keeps total duration: subtract time so far for duration of this audioholder
me@1942 163 duration = float(audioholder.find("./metric/metricresult[@id='testTime']").text) - total_duration
me@1942 164
me@1942 165 # total duration of test
me@1942 166 total_duration += duration
me@1942 167 else:
me@1942 168 duration = float('nan')
me@1942 169 total_duration = float('nan')
me@1942 170
me@1942 171 # number of audio elements
me@1942 172 audioelements = audioholder.findall("./audioelement") # get audioelements
me@1942 173 number_of_fragments += len(audioelements) # add length of this list to total
me@1942 174
me@1942 175 # number of comments (interesting if comments not mandatory)
me@1942 176 for audioelement in audioelements:
me@1942 177 response = audioelement.find("./comment/response")
me@1942 178 was_played = audioelement.find("./metric/metricresult/[@name='elementFlagListenedTo']")
me@1942 179 was_moved = audioelement.find("./metric/metricresult/[@name='elementFlagMoved']")
me@1942 180 if response.text is not None and len(response.text) > 1:
me@1942 181 number_of_comments += 1
me@1942 182 else:
me@1942 183 number_of_missing_comments += 1
me@1942 184 if was_played is not None and was_played.text == 'false':
me@1942 185 not_played.append(audioelement.get('id'))
me@1942 186 if was_moved is not None and was_moved.text == 'false':
me@1942 187 not_moved.append(audioelement.get('id'))
me@1942 188
me@1942 189 # update global counters
me@1942 190 total_empty_comments += number_of_missing_comments
me@1942 191 total_not_played += len(not_played)
me@1942 192 total_not_moved += len(not_moved)
me@1942 193
me@1942 194 # PRINT alerts when elements not played or markers not moved
me@1942 195 # number of audio elements not played
me@1942 196 if len(not_played) > 1:
me@1942 197 body += '\t\t\\emph{\\textbf{ATTENTION: '+str(len(not_played))+\
me@1942 198 ' fragments were not listened to in '+page_name+'! }}'+\
me@1942 199 ', '.join(not_played)+'\\\\ \n'
me@1942 200 if len(not_played) == 1:
me@1942 201 body += '\t\t\\emph{\\textbf{ATTENTION: one fragment was not listened to in '+page_name+'! }}'+\
me@1942 202 not_played[0]+'\\\\ \n'
me@1942 203
me@1942 204 # number of audio element markers not moved
me@1942 205 if len(not_moved) > 1:
me@1942 206 body += '\t\t\\emph{\\textbf{ATTENTION: '+str(len(not_moved))+\
me@1942 207 ' markers were not moved in '+page_name+'! }}'+\
me@1942 208 ', '.join(not_moved)+'\\\\ \n'
me@1942 209 if len(not_moved) == 1:
me@1942 210 body += '\t\t\\emph{\\textbf{ATTENTION: one marker was not moved in '+page_name+'! }}'+\
me@1942 211 not_moved[0]+'\\\\ \n'
me@1942 212
me@1942 213 # PRINT song-specific statistic
me@1942 214 individual_table += '\t\t'+page_name+'&'+\
me@1942 215 str(number_of_comments) + '/' +\
me@1942 216 str(number_of_comments+number_of_missing_comments)+'&'+\
me@1942 217 seconds2timestr(duration)+'\\\\\n'
me@1942 218
me@1942 219 # get timeline for this audioholder
me@1942 220 img_path = 'timelines_movement/'+file[:-4]+'-'+page_name+'.pdf'
me@1942 221
me@1942 222 # check if available
me@1942 223 if os.path.isfile(folder_name+'/'+img_path):
me@1942 224 # SHOW timeline image
me@1942 225 timeline_plots += '\\includegraphics[width=\\textwidth]{'+\
me@1942 226 folder_name+'/'+img_path+'}\n\t\t'
me@1942 227
me@1942 228 # keep track of duration in function of page index
me@1942 229 if len(duration_order)>page_number:
me@1942 230 duration_order[page_number].append(duration)
me@1942 231 else:
me@1942 232 duration_order.append([duration])
me@1942 233
me@1942 234 # keep list of audioholder ids and count how many times each audioholder id
me@1942 235 # was tested, how long it took, and how many fragments there were
me@1942 236 # (if number of fragments is different, store as different audioholder id)
me@1942 237 if page_name in page_names:
me@1942 238 page_index = page_names.index(page_name) # get index
me@1942 239 # check if number of audioelements the same
me@1942 240 if len(audioelements) == fragments_per_page[page_index]:
me@1942 241 page_count[page_index] += 1
me@1942 242 duration_page[page_index].append(duration)
me@1942 243 else: # make new entry
me@1942 244 alt_page_name = page_name+"("+str(len(audioelements))+")"
me@1942 245 if alt_page_name in page_names: # if already there
me@1942 246 alt_page_index = page_names.index(alt_page_name) # get index
me@1942 247 page_count[alt_page_index] += 1
me@1942 248 duration_page[alt_page_index].append(duration)
me@1942 249 else:
me@1942 250 page_names.append(alt_page_name)
me@1942 251 page_count.append(1)
me@1942 252 duration_page.append([duration])
me@1942 253 fragments_per_page.append(len(audioelements))
me@1942 254 else:
me@1942 255 page_names.append(page_name)
me@1942 256 page_count.append(1)
me@1942 257 duration_page.append([duration])
me@1942 258 fragments_per_page.append(len(audioelements))
me@1942 259
me@1942 260 # number of subjects per audioholder regardless of differing numbers of
me@1942 261 # fragments (for inclusion in box plots)
me@1942 262 if page_name in real_page_names:
me@1942 263 page_index = real_page_names.index(page_name) # get index
me@1942 264 subject_count[page_index] += 1
me@1942 265 else:
me@1942 266 real_page_names.append(page_name)
me@1942 267 subject_count.append(1)
me@1942 268
me@1942 269 # bookkeeping
me@1942 270 page_number += 1 # increase page count for this specific test
me@1942 271 number_of_pages += 1 # increase total number of pages
me@1942 272 time_per_page_accum += duration # total duration (for average time spent per page)
me@1942 273
me@1942 274 # PRINT table with statistics about this test
me@1942 275 body += '\t\t'+r'''\begin{tabular}{|p{3.5cm}|c|p{2.5cm}|}
me@1942 276 \hline
me@1942 277 \textbf{Song name} & \textbf{Comments} & \textbf{Duration} \\ \hline '''+\
me@1942 278 individual_table+'\t\t'+\
me@1942 279 r'''\hline
me@1942 280 \textbf{TOTAL} & & \textbf{'''+\
me@1942 281 seconds2timestr(total_duration)+\
me@1942 282 r'''}\\
me@1942 283 \hline
me@1942 284 \end{tabular}
me@1942 285
me@1942 286 '''
me@1942 287 # PRINT timeline plots
me@1942 288 body += timeline_plots
me@1942 289
me@1942 290 # join to footer
me@1942 291 footer = body + footer
me@1942 292
me@1942 293 # empty body again
me@1942 294 body = ''
me@1942 295
me@1942 296 # PRINT summary of everything (at start)
me@1942 297 # unnumbered so that number of sections equals number of files
me@1942 298 body += '\section*{Summary}\n\t\t\\addcontentsline{toc}{section}{Summary}\n'
me@1942 299
me@1942 300 # PRINT table with statistics
me@1942 301 body += '\t\t\\begin{tabular}{ll}\n\t\t\t'
me@1942 302 body += r'Number of XML files: &' + str(number_of_XML_files) + r'\\'+'\n\t\t\t'
me@1942 303 body += r'Number of pages: &' + str(number_of_pages) + r'\\'+'\n\t\t\t'
me@1942 304 body += r'Number of fragments: &' + str(number_of_fragments) + r'\\'+'\n\t\t\t'
me@1942 305 body += r'Number of empty comments: &' + str(total_empty_comments) +\
me@1942 306 " (" + str(round(100.0*total_empty_comments/number_of_fragments,2)) + r"\%)\\"+'\n\t\t\t'
me@1942 307 body += r'Number of unplayed fragments: &' + str(total_not_played) +\
me@1942 308 " (" + str(round(100.0*total_not_played/number_of_fragments,2)) + r"\%)\\"+'\n\t\t\t'
me@1942 309 body += r'Number of unmoved markers: &' + str(total_not_moved) +\
me@1942 310 " (" + str(round(100.0*total_not_moved/number_of_fragments,2)) + r"\%)\\"+'\n\t\t\t'
me@1942 311 body += r'Average time per page: &' + seconds2timestr(time_per_page_accum/number_of_pages) + r"\\"+'\n\t\t'
me@1942 312 body += '\\end{tabular} \\vspace{1.5cm} \\\\ \n'
me@1942 313
me@1942 314 # Average duration for first, second, ... page
me@1942 315 body += "\t\t\\vspace{.5cm} \n\n\t\tAverage duration per page (see also Figure \\ref{fig:avgtimeperpage}): \\\\ \n\t\t"
me@1942 316 body += r'''\begin{tabular}{lll}
me@1942 317 \textbf{Page} & \textbf{Duration} & \textbf{\# subjects}\\'''
me@1942 318 tpp_averages = [] # store average time per page
me@1942 319 for page_number in range(len(duration_order)):
me@1942 320 body += '\n\t\t\t'+str(page_number+1) + "&" +\
me@1942 321 seconds2timestr(sum(duration_order[page_number])/len(duration_order[page_number])) +\
me@1942 322 "&"+str(len(duration_order[page_number]))+r"\\"
me@1942 323 tpp_averages.append(sum(duration_order[page_number])/len(duration_order[page_number]))
me@1942 324
me@1942 325 body += '\n\t\t\\end{tabular} \\vspace{1.5cm} \\\\ \n\n\t\t'
me@1942 326
me@1942 327 # SHOW bar plot of average time per page
me@1942 328 plt.bar(range(1,len(duration_order)+1), np.array(tpp_averages)/60)
me@1942 329 plt.xlabel('Page order')
me@1942 330 plt.xlim(.8, len(duration_order)+1)
me@1942 331 plt.xticks(np.arange(1,len(duration_order)+1)+.4, range(1,len(duration_order)+1))
me@1942 332 plt.ylabel('Average time [minutes]')
me@1942 333 plt.savefig(folder_name+"/time_per_page.pdf", bbox_inches='tight')
me@1942 334 plt.close()
me@1942 335 #TODO add error bars
me@1942 336
me@1942 337
me@1942 338 # Sort pages by number of audioelements, then by duration
me@1942 339
me@1942 340 # average duration and number of subjects per page
me@1942 341 average_duration_page = []
me@1942 342 number_of_subjects_page = []
me@1942 343 for line in duration_page:
me@1942 344 number_of_subjects_page.append(len(line))
me@1942 345 average_duration_page.append(sum(line)/len(line))
me@1942 346
me@1942 347 # combine and sort in function of number of audioelements and duration
me@1942 348 combined_list = [page_names, average_duration_page, fragments_per_page, number_of_subjects_page]
me@1942 349 combined_list = sorted(zip(*combined_list), key=operator.itemgetter(1, 2)) # sort
me@1942 350
me@1942 351 # Show average duration for all songs
me@1942 352 body += r'''\vspace{.5cm}
me@1942 353 Average duration per audioholder (see also Figure \ref{fig:avgtimeperaudioholder}): \\
me@1942 354 \begin{tabular}{llll}
me@1942 355 \textbf{Audioholder} & \textbf{Duration} & \textbf{\# subjects} & \textbf{\# fragments} \\'''
me@1942 356 audioholder_names_ordered = []
me@1942 357 average_duration_audioholder_ordered = []
me@1942 358 number_of_subjects = []
me@1942 359 for page_index in range(len(page_names)):
me@1942 360 audioholder_names_ordered.append(combined_list[page_index][0])
me@1942 361 average_duration_audioholder_ordered.append(combined_list[page_index][1])
me@1942 362 number_of_subjects.append(combined_list[page_index][3])
me@1942 363 body += '\n\t\t\t'+combined_list[page_index][0] + "&" +\
me@1942 364 seconds2timestr(combined_list[page_index][1]) + "&" +\
me@1942 365 str(combined_list[page_index][3]) + "&" +\
me@1942 366 str(combined_list[page_index][2]) + r"\\"
me@1942 367 body += '\n\t\t\\end{tabular}\n'
me@1942 368
me@1942 369 # SHOW bar plot of average time per page
me@1942 370 plt.bar(range(1,len(audioholder_names_ordered)+1), np.array(average_duration_audioholder_ordered)/60)
me@1942 371 plt.xlabel('Audioholder')
me@1942 372 plt.xlim(.8, len(audioholder_names_ordered)+1)
me@1942 373 plt.xticks(np.arange(1,len(audioholder_names_ordered)+1)+.4, audioholder_names_ordered, rotation=90)
me@1942 374 plt.ylabel('Average time [minutes]')
me@1942 375 plt.savefig(folder_name+"/time_per_audioholder.pdf", bbox_inches='tight')
me@1942 376 plt.close()
me@1942 377
me@1942 378 # SHOW bar plot of average time per page
me@1942 379 plt.bar(range(1,len(audioholder_names_ordered)+1), number_of_subjects)
me@1942 380 plt.xlabel('Audioholder')
me@1942 381 plt.xlim(.8, len(audioholder_names_ordered)+1)
me@1942 382 plt.xticks(np.arange(1,len(audioholder_names_ordered)+1)+.4, audioholder_names_ordered, rotation=90)
me@1942 383 plt.ylabel('Number of subjects')
me@1942 384 ax = plt.gca()
me@1942 385 ylims = ax.get_ylim()
me@1942 386 yint = np.arange(int(np.floor(ylims[0])), int(np.ceil(ylims[1]))+1)
me@1942 387 plt.yticks(yint)
me@1942 388 plt.savefig(folder_name+"/subjects_per_audioholder.pdf", bbox_inches='tight')
me@1942 389 plt.close()
me@1942 390
me@1942 391 # SHOW both figures
me@1942 392 body += r'''
me@1942 393 \begin{figure}[htbp]
me@1942 394 \begin{center}
me@1942 395 \includegraphics[width=.65\textwidth]{'''+\
me@1942 396 folder_name+"/time_per_page.pdf"+\
me@1942 397 r'''}
me@1942 398 \caption{Average time spent per page.}
me@1942 399 \label{fig:avgtimeperpage}
me@1942 400 \end{center}
me@1942 401 \end{figure}
me@1942 402
me@1942 403 '''
me@1942 404 body += r'''\begin{figure}[htbp]
me@1942 405 \begin{center}
me@1942 406 \includegraphics[width=.65\textwidth]{'''+\
me@1942 407 folder_name+"/time_per_audioholder.pdf"+\
me@1942 408 r'''}
me@1942 409 \caption{Average time spent per audioholder.}
me@1942 410 \label{fig:avgtimeperaudioholder}
me@1942 411 \end{center}
me@1942 412 \end{figure}
me@1942 413
me@1942 414 '''
me@1942 415 body += r'''\begin{figure}[htbp]
me@1942 416 \begin{center}
me@1942 417 \includegraphics[width=.65\textwidth]{'''+\
me@1942 418 folder_name+"/subjects_per_audioholder.pdf"+\
me@1942 419 r'''}
me@1942 420 \caption{Number of subjects per audioholder.}
me@1942 421 \label{fig:subjectsperaudioholder}
me@1942 422 \end{center}
me@1942 423 \end{figure}
me@1942 424
me@1942 425 '''
me@1942 426 #TODO add error bars
me@1942 427 #TODO layout of figures
me@1942 428
me@1942 429 # SHOW boxplot per audioholder
me@1942 430 #TODO order in decreasing order of participants
me@1942 431 for audioholder_name in page_names: # get each name
me@1942 432 # plot boxplot if exists (not so for the 'alt' names)
me@1942 433 if os.path.isfile(folder_name+'/ratings/'+audioholder_name+'-ratings-box.pdf'):
me@1942 434 body += r'''\begin{figure}[htbp]
me@1942 435 \begin{center}
me@1942 436 \includegraphics[width=.65\textwidth]{'''+\
me@1942 437 folder_name+"/ratings/"+audioholder_name+'-ratings-box.pdf'+\
me@1942 438 r'''}
me@1942 439 \caption{Box plot of ratings for audioholder '''+\
me@1942 440 audioholder_name+' ('+str(subject_count[real_page_names.index(audioholder_name)])+\
me@1942 441 ''' participants).}
me@1942 442 \label{fig:boxplot'''+audioholder_name.replace(" ", "")+'''}
me@1942 443 \end{center}
me@1942 444 \end{figure}
me@1942 445
me@1942 446 '''
me@1942 447
me@1942 448 # DEMO pie chart of gender distribution among subjects
me@1942 449 genders = ['male', 'female', 'other', 'preferNotToSay', 'UNAVAILABLE']
me@1942 450 # TODO: get the above automatically
me@1942 451 gender_distribution = ''
me@1942 452 for item in genders:
me@1942 453 number = gender.count(item)
me@1942 454 if number>0:
me@1942 455 gender_distribution += str("{:.2f}".format((100.0*number)/len(gender)))+\
me@1942 456 '/'+item.capitalize()+' ('+str(number)+'),\n'
me@1942 457
me@1942 458 body += r'''
me@1942 459 % Pie chart of gender distribution
me@1942 460 \def\angle{0}
me@1942 461 \def\radius{3}
me@1942 462 \def\cyclelist{{"orange","blue","red","green"}}
me@1942 463 \newcount\cyclecount \cyclecount=-1
me@1942 464 \newcount\ind \ind=-1
me@1942 465 \begin{figure}[htbp]
me@1942 466 \begin{center}\begin{tikzpicture}[nodes = {font=\sffamily}]
me@1942 467 \foreach \percent/\name in {'''+\
me@1942 468 gender_distribution+\
me@1942 469 r'''} {\ifx\percent\empty\else % If \percent is empty, do nothing
me@1942 470 \global\advance\cyclecount by 1 % Advance cyclecount
me@1942 471 \global\advance\ind by 1 % Advance list index
me@1942 472 \ifnum6<\cyclecount % If cyclecount is larger than list
me@1942 473 \global\cyclecount=0 % reset cyclecount and
me@1942 474 \global\ind=0 % reset list index
me@1942 475 \fi
me@1942 476 \pgfmathparse{\cyclelist[\the\ind]} % Get color from cycle list
me@1942 477 \edef\color{\pgfmathresult} % and store as \color
me@1942 478 % Draw angle and set labels
me@1942 479 \draw[fill={\color!50},draw={\color}] (0,0) -- (\angle:\radius)
me@1942 480 arc (\angle:\angle+\percent*3.6:\radius) -- cycle;
me@1942 481 \node at (\angle+0.5*\percent*3.6:0.7*\radius) {\percent\,\%};
me@1942 482 \node[pin=\angle+0.5*\percent*3.6:\name]
me@1942 483 at (\angle+0.5*\percent*3.6:\radius) {};
me@1942 484 \pgfmathparse{\angle+\percent*3.6} % Advance angle
me@1942 485 \xdef\angle{\pgfmathresult} % and store in \angle
me@1942 486 \fi
me@1942 487 };
me@1942 488 \end{tikzpicture}
me@1942 489 \caption{Representation of gender across subjects}
me@1942 490 \label{default}
me@1942 491 \end{center}
me@1942 492 \end{figure}
me@1942 493
me@1942 494 '''
me@1942 495 # problem: some people entered twice?
me@1942 496
me@1942 497 #TODO
me@1942 498 # time per page in function of number of fragments (plot)
me@1942 499 # time per participant in function of number of pages
me@1942 500 # plot total time for each participant
me@1942 501 # show 'count' per page (in order)
me@1942 502
me@1942 503 # clear up page_index <> page_count <> page_number confusion
me@1942 504
me@1942 505
me@1942 506 texfile = header+body+footer # add bits together
me@1942 507
me@1942 508 # write TeX file
me@1942 509 with open(folder_name + '/' + 'Report.tex','w') as f:
me@1942 510 f.write(texfile)
me@1942 511 proc=subprocess.Popen(shlex.split('pdflatex -output-directory='+folder_name+' '+ folder_name + '/Report.tex'))
me@1942 512 proc.communicate()
me@1942 513 # run again
me@1942 514 proc=subprocess.Popen(shlex.split('pdflatex -output-directory='+folder_name+' '+ folder_name + '/Report.tex'))
me@1942 515 proc.communicate()
me@1942 516
me@1942 517 #TODO remove auxiliary LaTeX files
me@1942 518 try:
me@1942 519 os.remove(folder_name + '/' + 'Report.aux')
me@1942 520 os.remove(folder_name + '/' + 'Report.log')
me@1942 521 os.remove(folder_name + '/' + 'Report.out')
me@1942 522 os.remove(folder_name + '/' + 'Report.toc')
me@1942 523 except OSError:
me@1942 524 pass
me@1942 525