People

In his circles

74 people

Start a hangout

David Moore

Attends San Diego Miramar College

Lives in San Diego, CA

184 followers|81,894 views

AboutPostsPhotosVideos

People

In his circles

74 people

Education

- San Diego Miramar College2011 - present

Basic Information

Gender

Male

Birthday

March 19, 1994

Links

YouTube

Other profiles

Story

Tagline

Aspiring physicist

Introduction

I'm a student who would love to go into high-level academia. See my portfolio and my youtube channel for some projects I've worked on.

I started programming at the age of 11, and now I'm studying physics and some pure math at the level of real analysis, introductory computational physics, and introductory dynamics (Lagrangians and what-not). I do all this on my free time, but I have very little going for me academically, being in community college, with my only STEM classes being introductory linear algebra and vector calculus (old news!)

If you have project recommendations, book recommendations, or anything really, I'd love to hear them!

Bragging rights

Pretty fluent with Java/C++ (Yes really!)/JS/DBPro/Mathematica

Places

Currently

San Diego, CA

Contact Information

Work

- dmoore101@gmx.com
| |

Hi +Dan Piponi , I'm getting ready for free-time summer projects after the quarter ends. I think a fun project would be writing computer verified proofs of some of what's in Euclid's elements. I remember you posting a little bit on computer verified proofs a while back (maybe what I'm remembering is this post https://plus.google.com/+DanPiponi/posts/G1HJcVzk3oU ). Any ideas on this project and whether it sounds interesting or not? Thanks!

1

2 comments

+John Baez wow, I had never heard about Tarski's axioms. I had found a source for Hilbert's axioms on the metamath proof explorer (can't find it, now, but I can find this http://us.metamath.org/mpegif/mmtheorems175.html#mm17494s ) but I'm not exactly sure if metamath is the best way to go about it. Mostly it's the implementation that's bugging me! Ex., wolfram a new kind of science has a list of axioms for euclidean plane geometry ( http://www.wolframscience.com/nksonline/page-774 ) but I'm finding it very difficult to actually get to an implementation!

Add a comment...

2

6 comments

Hi David, check out - https://vimeo.com/123752837

Add a comment...

The self-fulfilling prophecy.

1

3 comments

Yep youve left me for dead, but how are you thngs ok . There are some you which interesting and I share with family. So thanks for what you have shared.

Add a comment...

+Chris Thomasson Couldn't resist! Sorry, copying+pasting destroys all the indentation. The "hat" vectors aren't actually unit vectors, but they play the role of axes.

v=Table[{Cos[2 Pi k/3],Sin[2 Pi k/3],0},{k,0,2}];

i={{1,2,3}};

vmotif={{0,0,0},{1,0,0},{1/3,1/3,0.3},{0,1,0}};

imotif={{1,2,3},{1,3,4},{4,3,2}};

replacement[{v_,i_}]:=Module[{retv,reti,xhat,yhat,zhat,origin,vindex},

retv={};

reti={};

vindex=0;

Do[

origin=v[[indc[[1]]]];

xhat=v[[indc[[2]]]]-v[[indc[[1]]]];

yhat=v[[indc[[3]]]]-v[[indc[[1]]]];

zhat=Cross[xhat,yhat];

retv=Join[retv,Table[pt.{xhat,yhat,zhat}+origin,{pt,vmotif}]];

reti=Join[reti,vindex+imotif];

vindex+=Length[vmotif];

,{indc,i}];

{retv,reti}

];

plot[s_]:=Graphics3D[{EdgeForm[None],Yellow,GraphicsComplex[#1,Polygon[#2]]}]&@@s;

plot[Nest[replacement,{v,i},9]]

v=Table[{Cos[2 Pi k/3],Sin[2 Pi k/3],0},{k,0,2}];

i={{1,2,3}};

vmotif={{0,0,0},{1,0,0},{1/3,1/3,0.3},{0,1,0}};

imotif={{1,2,3},{1,3,4},{4,3,2}};

replacement[{v_,i_}]:=Module[{retv,reti,xhat,yhat,zhat,origin,vindex},

retv={};

reti={};

vindex=0;

Do[

origin=v[[indc[[1]]]];

xhat=v[[indc[[2]]]]-v[[indc[[1]]]];

yhat=v[[indc[[3]]]]-v[[indc[[1]]]];

zhat=Cross[xhat,yhat];

retv=Join[retv,Table[pt.{xhat,yhat,zhat}+origin,{pt,vmotif}]];

reti=Join[reti,vindex+imotif];

vindex+=Length[vmotif];

,{indc,i}];

{retv,reti}

];

plot[s_]:=Graphics3D[{EdgeForm[None],Yellow,GraphicsComplex[#1,Polygon[#2]]}]&@@s;

plot[Nest[replacement,{v,i},9]]

2 photos

6

5 comments

If you can close the bottom,

there is no reason you can't get a 3d printed model of it

with some work.

there is no reason you can't get a 3d printed model of it

with some work.

Add a comment...

+Tim Hutton I'm trying to find a javascript (or maybe it was java) thing and it might have been you that posted it. It was a little app involving solid geometry where you could type a string in a box below the app. If you wrote "d" it would take the dual of the current shape, and if you wrote "sd" it would take the dual then stellate, and I think if you wrote "tsd" it would take the dual then stellate then truncate. There were about six other commands too if I recall correctly. Let me know if any of that sounds familiar!

1

2 comments

+Tim Hutton Ahh that's almost exactly it. I remember one which I think used Three.js and was on some university user page. But from the code it looks like it might be easy enough to convert to three.js myself. Thanks!

Add a comment...

Just for the picture :D

Mechanically generated turbulence is visible as "swirl" behind the turbine.

The visible wind wake itself is a result of lower pressure behind the turbine which forces humidity to condense. The pressure is lower, because of a speed deficit (part of the wind speed is transferred into thrust of the turbine).

Shear stress is the reason that the wind wake widens. It induces a speed gradient vertical to the main flow direction.

1

Add a comment...

In his circles

74 people

Is there a topological/geometric question that left and right handed mathematicians will generally have different answers to?

1

Add a comment...

+George Hart , going to build a second at the UCSD math club meeting, and later design some polyhedra of our own!

2 photos

2

Add a comment...

I always thought pie charts were pretty bad as a visualisation option. This set of slides shows you how to get them actually looking good.

The poor, maligned 3D pie chart. He is so popular among the common folk, but put him next to his peers and his vacant stare betrays (not entirely unfounded) feelings of insecurity and inadequacy. Sometimes the only way to address such feelings is to let go of your inhibitions and do something ...

2

Add a comment...

New fractal 3d substitution system. Note: I changed "zhat", in a way so that its magnitude is symmetric upon swapping the "xhat" and "yhat" vectors, and in a way that's consistent with units!

v=Table[{Cos[2 Pi k/3],Sin[2 Pi k/3],0},{k,0,2}];

i={{1,2,3}};

vmotif=N@{{0,0,0},{1,0,0},{1/3,1/3,Sqrt[2/9]/4},{0,1,0}};

imotif={{1,2,3},{1,3,4},{3,2,4}};

replacement[{v_,i_}]:=Module[{retv,reti,xhat,yhat,zhat,origin,vindex},

retv={};

reti={};

vindex=0;

Do[

origin=v[[indc[[1]]]];

xhat=v[[indc[[2]]]]~~v[[indc[[1]]]];~~

~~yhat=v[[indc[[3]]]]-v[[indc[[1]]]];~~

~~zhat=Cross[xhat,yhat]/((xhat.xhat)(yhat.yhat))^(1/4);~~

~~retv=Join[retv,Table[pt.{xhat,yhat,zhat}+origin,{pt,vmotif}]];~~

~~reti=Join[reti,vindex+imotif];~~

~~vindex+=Length[vmotif];~~

~~,{indc,i}];~~

~~{retv,reti}~~

~~];~~

~~plot[s_]:=Graphics3D[{Opacity[0.4],Yellow,EdgeForm[None],GraphicsComplex[#1,Polygon[#2]]},Boxed~~>False]&@@s;

plot[Nest[replacement,{v,i},7]]

Other motifs:

Koch (my interpretation):

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0},{0,1/2,0},{1/2,1/2,0},{1/3,1/3,Sqrt[2/3]/2}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,7,5},{6,5,7},{4,6,7}};

Rough:

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0.1},{0,1/2,0.1},{1/2,1/2,0.1}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,6,5}};

Jagged Koch:

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0},{0,1/2,0},{1/2,1/2,0},{1/3 0.7,1/3 0.9,Sqrt[2/3].7/2}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,7,5},{6,5,7},{4,6,7}};

v=Table[{Cos[2 Pi k/3],Sin[2 Pi k/3],0},{k,0,2}];

i={{1,2,3}};

vmotif=N@{{0,0,0},{1,0,0},{1/3,1/3,Sqrt[2/9]/4},{0,1,0}};

imotif={{1,2,3},{1,3,4},{3,2,4}};

replacement[{v_,i_}]:=Module[{retv,reti,xhat,yhat,zhat,origin,vindex},

retv={};

reti={};

vindex=0;

Do[

origin=v[[indc[[1]]]];

xhat=v[[indc[[2]]]]

plot[Nest[replacement,{v,i},7]]

Other motifs:

Koch (my interpretation):

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0},{0,1/2,0},{1/2,1/2,0},{1/3,1/3,Sqrt[2/3]/2}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,7,5},{6,5,7},{4,6,7}};

Rough:

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0.1},{0,1/2,0.1},{1/2,1/2,0.1}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,6,5}};

Jagged Koch:

vmotif=N@{{0,0,0},{1,0,0},{0,1,0},{1/2,0,0},{0,1/2,0},{1/2,1/2,0},{1/3 0.7,1/3 0.9,Sqrt[2/3].7/2}};

imotif={{1,4,5},{2,6,4},{3,5,6},{4,7,5},{6,5,7},{4,6,7}};

4 photos

4

6 comments

Yes, I think you should spend a little time working on fractal programming.

As you get the time... LOL.

As you get the time... LOL.

Add a comment...

Interstellar - About building a Black Hole 720p

If anyone who reads this goes to see Interstellar afterwards, keep an eye out - there's one line that's something along the lines of, "you know relativity!" that I really wanted to quote. I forgot the line!!!

2 photos

1

Add a comment...