Bilaga 1: Infästning av dagens skyltdockor Bilaga 2: Z-konstant
Bilaga 3: GANTT-schema Bilaga 4: Poster
Bilaga 5: Instruktioner mätning Bilaga 6: Bearbetning av data Bilaga 7: Mathematicaberäkningar Bilaga 8: Meshmixer
Bilaga 9: Beräkning av kardborre
Bilaga 1 – Infästning av dagens skyltdockor
Bilaga 2 – Z-konstant
Bilaga 3 – GANTT-schema
Examensarbete
Halmstad Kommun
Project Start Date Display Week 1
Project Lead
1.1 Uppstartsmöte E/H Tis 1-22-19 Tis 1-22-19 1 100% 1
1.2 Projektbeskrivning E/H Ons 1-23-19 Tis 1-29-19 7 20% 5
1.3 Uppdaterad
projektbeskrivning E/H Fre 2-01-19 Fre 2-01-19 1 0% 1
1.4 Seminarium E/H Mån 2-04-19 Mån 2-04-19 1 0% 1
1.4.1 Förstudie E/H Mån 1-28-19 Sön 2-17-19 21 0% 19
1.4.2 Annons/urvalsprocess E/H Ons 1-30-19 Tis 2-12-19 14 0% 14
1.5 3D- Skanning försök 1 Ons 2-13-19 Tis 3-05-19 21 0% 21
1.6 Dokumentation Fre 2-01-19 Tor 3-14-19 42 0% 42
1.7 Halvtidsrapport inlämning Fre 3-15-19 Fre 3-15-19 1 0% 1
2 Upplärning - -
2.1 3D skanning Mån 2-04-19 Fre 2-08-19 5 0% 5
2.2 Mån 3-18-19 Fre 3-22-19 5 0% 5
2.3 Ons 2-14-18 Fre 2-16-18 3 0% 3
2.4 Lör 2-17-18 Tor 2-22-18 6 0% 4
2.5 Fre 2-23-18 Sön 2-25-18 3 0% 1
3 Redovisning - -
3.1 Halvtidsredovisning Mån 3-18-19 Mån 3-18-19 1 0% 1
3.2 [Task] Ons 2-14-18 Fre 2-16-18 3 0% 3
-Gantt Chart Template © 2006-2018 by Vertex42.com.
Week 2
Project Start Date Display Week 1
Project Lead
1.1 3D-printing E/H Mån 4-01-19 Ons 4-24-19 24 0% 24
1.2 Montering E/H Ons 4-10-19 Tis 4-23-19 14 0% 14
1.3 Demontering E/H Ons 4-17-19 Tis 4-23-19 7 0% 7
1.4 Analys E/H Mån 4-01-19 Tis 4-30-19 30 0% 32
1.4.1 Rapportskrivning E/H Mån 4-01-19 Tor 5-02-19 32 0% 32
1.4.2 Inlämning
rapport-premilinär utgåva E/H Mån 5-06-19 Mån 5-06-19 1 0% 1
1.5 Inlämning rapport-slutgiltlig E/H Mån 5-13-19 Mån 5-13-19 1 0% 1
1.6 Lör 2-03-18 Fre 2-09-18 7 0% 5
1.7 Lör 2-10-18 Fre 2-16-18 7 0% 5
2 Upplärning - -
2.1 3D-printing Mån 3-25-19 Fre 3-29-19 5 0% 5
2.2 [Task] Ons 2-14-18 Fre 2-16-18 3 0% 3
2.3 [Task] Ons 2-14-18 Fre 2-16-18 3 0% 3
2.4 [Task] Lör 2-17-18 Tor 2-22-18 6 0% 4
2.5 [Task] Fre 2-23-18 Sön 2-25-18 3 0% 1
3 Redovisning - -
3.1 Redovisning Tis 5-14-19 Tis 5-14-19 1 0% 1
3.2 UT-EXPO Fre 5-24-19 Fre 5-24-19 1 0% 1
3.3 [Task] Ons 2-14-18 Fre 2-16-18 3 0% 3
Gantt Chart Template © 2006-2018 by Vertex42.com.
Week 2
Bilaga 4 – Poster
Bilaga 5 – Instruktioner mätning
STEG:
BESKRIVNING:
MEASURE
För att kunna mäta modellen i till exempel höftbredden används funktionen Measure.
LINEAR
Då projektgruppen är intresserade av linjära mått används funktionen Linear och sedan sätter personen ut punkter baserat på de mått som är av intresse.
MAKE ANOTHER
Eftersom projektgruppen mäter fler mått än ett krävs funktionen Make another för att kunna fortsätta mäta på 3D-modellen.
Bilaga 6 – Bearbetning av data
STEG: BESKRIVNING:
EDITOR Efter att scanningen är färdig används denna funktion för att kunna korrigera modellen i programmet
ALIGN Denna funktion används endast vid flera scans. Det kan till exempel bero på att scanningsutrustningen tappat tracking, vilket medför flera olika filer av samma person
GLOBAL REGISTRATION Den här funktionen omvandlar alla 3D-ramar till ett koordinatsystem med information om ramarnas position i förhållande till varandra
SHARP FUSION Funktionen används för att skapa skarpare ytor
ERASER – CUT OF PLAN SELECTION
Scanningsmodellen (människan) står på ett golv, för att golvet inte ska följa med till 3D-printern krävs funktionen Eraser – cut of plan selection som medför att golvet tas bort från filen
HOLES När golvet tagits bort kommer individen som scannats av ha ”hål” i fötterna. För att lägga en yta där används ”Hole” funktionen
SMALL OBJECT FILTER Används för att ta bort objekt i ”luften”. Påverkar annars 3D-printningen negativt
TEXTURING Om det efterfrågas färg på 3D-modellen används funktionen ”Texturing” som lägger på exakt den färg/kläder individen hade vid scanningen
SAVE FILE Filen sparas som en stl-fil för att kunna skrivas ut
Bilaga 7- Mathematica beräkningar Kvinnor
In[124]:= Remove["Global`*"]
In[125]:= SetDirectory "C:\\Users\\Emma\\Desktop\\skola\\ÅR
3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning" ;
"C:\\Users\\Emma\\Desktop\\skola\\ÅR 3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning"
In[126]:= data = Import
"C:\\Users\\Emma\\Desktop\\skola\\ÅR 3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning\\Tabell scanning människor-Kvinnor-txt.txt", "TSV" ;
In[127]:= dataskyltdocka = Import
"C:\\Users\\Emma\\Desktop\\skola\\ÅR 3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning\\tabell scanning skyltdockor.txt", "TSV" ;
In[128]:= kroppslängdkvinna = data〚2 ;;, 2〛;
In[129]:= höftbreddkvinna = data〚2 ;;, 8〛;
In[130]:= kroppslängdskyltdocka = dataskyltdocka〚2 ;;, 2〛;
In[131]:= höftbreddskyltdocka = dataskyltdocka〚2 ;;, 3〛;
In[132]:= nkvinna = 34;
In[133]:= nskyltdocka = 10;
Kroppslängd
Medellängd
In[134]:= medellängdkvinna = Mean[kroppslängdkvinna] // N
Out[134]= 1660.74
In[135]:= medellängdskyltocka = Mean[kroppslängdskyltdocka] // N
Out[135]= 1775.5
Printed by Wolfram Mathematica Student Edition
Standardavvikelse
In[136]:= summakvinnor = Total Table kroppslängdkvinna〚i〛 - medellängdkvinna 2, {i, 1, 34}
Out[136]= 120 303.
In[137]:= SDkvinnor = summakvinnor
nkvinna - 1
Out[137]= 60.3783
In[138]:= summaskyltdocka =
Total Table kroppslängdskyltdocka〚i〛 - medellängdskyltocka 2, {i, 1, 10}
Out[138]= 11 822.5
In[139]:= SDskyltdocka = summaskyltdocka
nskyltdocka - 1
Out[139]= 36.2438
5:e percentilen
In[140]:= femtepercentilenkvinna =
Solve X5 ⩵ medellängdkvinna + SDkvinnor - 1.64 //First // First
Out[140]= X5 → 1561.71
In[141]:= femtepercentilenskyltdocka =
Solve X5 ⩵ medellängdskyltocka + SDskyltdocka - 1.64 //First // First
Out[141]= X5 → 1716.06
50:e percentilen
In[142]:= femtiondeepercentilenkvinna =
Solve X50 ⩵ medellängdkvinna + SDkvinnor 0 //First // First
Out[142]= X50 → 1660.74
In[143]:= femtiondepercentilenskyltdocka =
Solve X50 ⩵ medellängdskyltocka + SDskyltdocka 0 //First // First
Out[143]= X50 → 1775.5
95:percentilen
In[144]:= nittiofemtepercentilenkvinna =
Solve X95 ⩵ medellängdkvinna + SDkvinnor 1.64 //First // First
Out[144]= X95 → 1759.76
2 jämförelse-skyltdocka-data.nb
Printed by Wolfram Mathematica Student Edition
In[145]:= nittiofemtepercentilenskyltdocka =
Solve X95 ⩵ medellängdskyltocka + SDskyltdocka 1.64 //First // First
Out[145]= X95 → 1834.94
Höftbredd
Medelbredd
In[146]:= medelbreddkvinna = Mean[höftbreddkvinna] // N
Out[146]= 366.235
In[147]:= medelbreddskyltdocka = Mean[höftbreddskyltdocka] // N
Out[147]= 299.5
Standardavvikelse
In[148]:= summakvinnor2 = Total Table höftbreddkvinna〚i〛 - medelbreddkvinna 2, {i, 1, 34}
Out[148]= 24 346.1
In[149]:= SDkvinnor2 = summakvinnor2
nkvinna - 1
Out[149]= 27.1618
In[150]:= summaskyltdocka2 =
Total Table höftbreddskyltdocka〚i〛 - medelbreddskyltdocka 2, {i, 1, 10}
Out[150]= 1122.5
In[151]:= SDskyltdocka2 = summaskyltdocka2
nskyltdocka - 1
Out[151]= 11.1679
5:e percentilen
In[152]:= femtepercentilenkvinna2 =
Solve X5 ⩵ medelbreddkvinna + SDkvinnor2 - 1.64 //First // First
Out[152]= X5 → 321.69
In[153]:= femtepercentilenskyltdockas2 =
Solve X5 ⩵ medelbreddskyltdocka + SDskyltdocka2 - 1.64 //First // First
Out[153]= X5 → 281.185
jämförelse-skyltdocka-data.nb 3
Printed by Wolfram Mathematica Student Edition
50:e percentilen
In[154]:= femtiondeepercentilenkvinna2 =
Solve X50 ⩵ medelbreddkvinna + SDkvinnor2 0 //First // First
Out[154]= X50 → 366.235
In[155]:= femtiondeepercentilenskyltdocka2 =
Solve X50 ⩵ medelbreddskyltdocka + SDskyltdocka2 0 //First // First
Out[155]= X50 → 299.5
95:e percentilen
In[156]:= nittiofemtepercentilenkvinna2 =
Solve X95 ⩵ medelbreddkvinna + SDkvinnor2 1.64 //First // First
Out[156]= X95 → 410.781
In[157]:= nittiofemtepercentilenkskyltdocka2 =
Solve X95 ⩵ medelbreddskyltdocka + SDskyltdocka2 1.64 //First // First
Out[157]= X95 → 317.815
Test
Remove["Global`*"]
In[169]:= SmoothHistogram[{kroppslängdkvinna, kroppslängdskyltdocka}, Filling → Axis,
Axes → {True, False}, PlotLegends → {"Kvinnor", "Skyltdockor"},
PlotLabel → "(a)- Kroppslängd för kvinnor", AxesLabel → {"[mm]", "[f(x)"}]
Out[169]=
1500 1600 1700 1800 [mm]
(a)- Kroppslängd för kvinnor
Kvinnor Skyltdockor
4 jämförelse-skyltdocka-data.nb
Printed by Wolfram Mathematica Student Edition
In[171]:= SmoothHistogram[{höftbreddkvinna, höftbreddskyltdocka}, Filling → Axis,
Filling → Axis, Axes → {True, False}, PlotLegends → {"Kvinnor", "Skyltdockor"}, PlotLabel → "(a)- Höftbredd för kvinnor", AxesLabel → {"[mm]", "[f(x)]"}]
Out[171]=
300 350 400 450 [mm]
(a)- Höftbredd för kvinnor
Kvinnor Skyltdockor
jämförelse-skyltdocka-data.nb 5
Printed by Wolfram Mathematica Student Edition
Jämförelse mellan datainsamling och skyltdocka-Män
In[192]:= Remove["Global`*"]
In[193]:= SetDirectory "C:\\Users\\Emma\\Desktop\\skola\\ÅR
3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning"
Out[193]= C:\Users\Emma\Desktop\skola\ÅR 3\EXAMENSARBETE\Mathematica\Slutgiltlig räkning
In[194]:= data2 = Import
"C:\\Users\\Emma\\Desktop\\skola\\ÅR 3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning\\tabell-scanning-män.txt", "TSV" ;
In[195]:= dataskyltdocka2 = Import
"C:\\Users\\Emma\\Desktop\\skola\\ÅR 3\\EXAMENSARBETE\\Mathematica\\Slutgiltlig räkning\\tabell scanning skyltdockor-män.txt", "TSV" ;
In[196]:= kroppslängdman = data2〚2 ;;, 2〛;
In[197]:= höftbreddman = data2〚2 ;;, 8〛;
In[198]:= kroppslängdskyltdocka = dataskyltdocka2〚2 ;;, 2〛;
In[199]:= höftbreddskyltdocka = dataskyltdocka2〚2 ;;, 3〛;
In[200]:= nman = 18;
In[201]:= nskyltdocka = 8;
Kroppslängd
Medellängd
In[202]:= medellängdman = Mean[kroppslängdman] // N
Out[202]= 1795.78
In[203]:= medellängdskyltocka = Mean[kroppslängdskyltdocka] // N
Out[203]= 1838.75
Standardavikelse
In[204]:= summaman = Total Table kroppslängdman〚i〛 - medellängdman 2, {i, 1, 18}
Out[204]= 87 311.1
Printed by Wolfram Mathematica Student Edition
In[205]:= SDman1 = summaman nman - 1
Out[205]= 71.6655
In[206]:= summaskyltdocka =
Total Table kroppslängdskyltdocka〚i〛 - medellängdskyltocka 2, {i, 1, 8}
Out[206]= 16 487.5
In[207]:= SDskyltdocka = summaskyltdocka
nskyltdocka - 1
Out[207]= 48.532
5:e percentilen
In[208]:= femtepercentilenman = Solve X5 ⩵ medellängdman + SDman1 - 1.64 //First // First
Out[208]= X5 → 1678.25
In[209]:= femtepercentilenskyltdocka =
Solve X5 ⩵ medellängdskyltocka + SDskyltdocka - 1.64 //First // First
Out[209]= X5 → 1759.16
50:e percentilen
In[210]:= femtiondeepercentilenman = Solve X50 ⩵ medellängdman + SDman1 0 //First // First
Out[210]= X50 → 1795.78
In[211]:= femtiondepercentilenskyltdocka =
Solve X50 ⩵ medellängdskyltocka + SDskyltdocka 0 //First // First
Out[211]= X50 → 1838.75
95:percentilen
In[212]:= nittiofemtepercentilenman = Solve X95 ⩵ medellängdman + SDman1 1.64 //First // First
Out[212]= X95 → 1913.31
In[213]:= nittiofemtepercentilenskyltdocka =
Solve X95 ⩵ medellängdskyltocka + SDskyltdocka 1.64 //First // First
Out[213]= X95 → 1918.34
Höftbredd
2 jämförelse-skyltdocka-data-MAN.nb
Printed by Wolfram Mathematica Student Edition
Medelbredd
In[222]:= medelbreddman = Mean[höftbreddman] // N
Out[222]= 361.
In[223]:= medelbreddskyltdocka = Mean[höftbreddskyltdocka] // N
Out[223]= 347.5
Standardavikelse
In[224]:= summaman2 = Total Table höftbreddman〚i〛 - medelbreddman 2, {i, 1, 18}
Out[224]= 11 528.
In[225]:= SDman2 = summaman2
nman - 1
Out[225]= 26.0407
In[226]:= summaskyltdocka2 =
Total Table höftbreddskyltdocka〚i〛 - medelbreddskyltdocka 2, {i, 1, 8}
Out[226]= 950.
In[227]:= SDskyltdocka2 = summaskyltdocka2
nskyltdocka - 1
Out[227]= 11.6496
5:e percentilen
In[228]:= femtepercentilenman2 = Solve X5 ⩵ medelbreddman + SDman2 - 1.64 //First // First
Out[228]= X5 → 318.293
In[229]:= femtepercentilenskyltdocka2 =
Solve X5 ⩵ medelbreddskyltdocka + SDskyltdocka2 - 1.64 //First // First
Out[229]= X5 → 328.395
50:e percentilen
In[230]:= femtiondeepercentilenman2 = Solve X50 ⩵ medelbreddman + SDman2 0 //First // First
Out[230]= X50 → 361.
jämförelse-skyltdocka-data-MAN.nb 3
Printed by Wolfram Mathematica Student Edition
In[231]:= femtiondeepercentilenskyltdocka2 =
Solve X50 ⩵ medelbreddskyltdocka + SDskyltdocka2 0 //First // First
Out[231]= X50 → 347.5
95:e percentilen
In[232]:= nittiofemtepercentilenman2 = Solve X95 ⩵ medelbreddman + SDman2 1.64 //First // First
Out[232]= X95 → 403.707
In[233]:= nittiofemtepercentilenkskyltdocka2 =
Solve X95 ⩵ medelbreddskyltdocka + SDskyltdocka2 1.64 //First // First
Out[233]= X95 → 366.605
Test
In[235]:= SmoothHistogram[{kroppslängdman, kroppslängdskyltdocka},
Filling → Axis, Axes → {True, False}, AxesLabel → {"[mm]", "[f(x)]"},
PlotLegends → {"Män", "Skyltdockor"}, PlotLabel → "(b)- Kroppslängd för män"]
Out[235]=
1600 1700 1800 1900 2000 [mm]
(b)- Kroppslängd för män
Män Skyltdockor
4 jämförelse-skyltdocka-data-MAN.nb
Printed by Wolfram Mathematica Student Edition
In[236]:= SmoothHistogram[{höftbreddman, höftbreddskyltdocka}, Filling → Axis, Axes → {True, False}, PlotLegends → {"Män", "Skyltdockor"},
PlotLabel → "(b)- Höftbredd för män", AxesLabel → {"[mm]", "[f(x)]"}]
Out[236]=
300 350 400 450 [mm]
(b)- Höftbredd för män
Män Skyltdockor
jämförelse-skyltdocka-data-MAN.nb 5
Printed by Wolfram Mathematica Student Edition
Bilaga 8 - Meshmixer
Print proporties: W=1100, D=500, H=820
FUNKTIONER BESKRIVNING
IMPORT Importera fil
EDIT-TRANSFORM Rotera och ställ på plattform. Fötter skall vara mot bottenplatta.
EDIT-PLANE CUT (KEEP BOTH)
Markera vart snitt skall skapas EDIT-SEPERATES
SHELLS
Snitten separeras och olika delar skapas
COMBINE Om otillfredsställande delar uppstår, markera de delar som skall anknytas och välj combine.
SELECT Om otillfredsställande hål skapas, markera vassa kanter med sphere brush.
SELECT Markera båda sidor av hålet
EDIT-BRIDGE Skapa en uppbyggnad, denna uppbyggnad kan även roteras för önskad position och vinkel.
ANALYSIS-INSPECTOR
Fyll i resterande hål.
SCULPT För att göra kanter mer verkliga och skulptera egna uppbyggnader.
MESHMIX Markera objekt, importera cylinder och välj boolean subtract för att skapa hål i det markerade objektet.
Bilaga 9 – Beräkning kardborre
Besöksadress: Kristian IV:s väg 3 Postadress: Box 823, 301 18 Halmstad Telefon: 035-16 71 00
E-mail: registrator@hh.se www.hh.se
Emma Reinholdsson Hannah Carlbom