FC2BBS
もろもろHLGyk - 退蔵 Home
2008/09/16 (Tue) 03:36:30
はじめて生でおま○こ見ちゃったよ、しかも目前で！！
指挿れてみたけど、あれどうなってんだろうね？？
あんなの、ち○こ入れたら、即発射に決まってるじゃんｗｗ
正直１５分くらいで３0万ゲッツしちゃったんだけど…いいのかなｗ
http://paipan.d-recycle.net/HLGyk/
恥ずかしい。。。BgMye - でかいど Home
2008/09/08 (Mon) 06:29:27
今回の女の子、初恋の女の子に超似てて
自分が服脱ぐのさえ恥ずかしかったのに、
巨乳をティンコに押し付けられただけで、逝ってしまいました。。。
初恋の顔が精子まみれになって、興奮しまくった。。。
http://ameba.tsumekami.com/BgMye/
顔出し要望があったから - KANA
2008/08/26 (Tue) 22:19:20
せっかくだし.顔出しチャレンジしてみました。まだまだ素人ですけど覗いてくれると嬉しいですｗ掲示板もあるから足跡期待してまーす(^^)/
http://kana.deaifree.biz/
動画いっぱい追加しました♪ - 綾乃 Home
2008/08/26 (Tue) 18:52:35
どうも！綾乃です私個人で色んなＨな写真や動画を見れるサイトをやっていますＴバック写真が多いかも！！でもあんな写真も撮っちゃいましたｗｗｗｗｗｗw
ちなみに3サイズはＢ85Ｗ56Ｈ82です。
aitaimiss.freeing.name
超サイテぇええ｡･ﾟ･(ﾉД`)･ﾟ･｡Bpmri - トモちゃん Home
2008/08/16 (Sat) 18:10:04
付き合う事になった彼氏、もう34歳で凄いお金持ちだなぁって思ってたら
顔ぶちゃいくなのに、こんなお仕事してた。。。がちょーん
↓↓
http://paco.quadro-prex.com/Bpmri/
うっは！！！！！！lRxFx - アリヲ Home
2008/08/11 (Mon) 02:15:45
芳郎、こんなイケてるサイト隠してやがった↓↓
http://pupupu.8e8ae.net/lRxFx/
まだ男少ないから、客の取り合いとか無いし、
俺、昨日もそこの女と会ってきたんだけど、
やばロリータで、天然パイパモﾈの！！
おもわず中に出しそうになったよｗｗｗｗｗ
今月は稼ぐぞー！！
2008/07/14 (Mon) 07:30:49
http://chama.pRoly.net/zbVlFKW/
吉永の奴、いつも家に居るくせにやたら金持ってると思ったら
こんな事してやがった。。。orz
あんな臭くてイケてない奴でも稼げるもんなんだなｗ
３Ｐ！３Ｐ！３Ｐ！rOKaO - ぺる Home
2008/07/01 (Tue) 23:03:53
興奮したのと、あまりにしまりが良すぎて中に出しちゃったおｗｗｗ
しかし、てぃん子の感じるところ知りたいって娘、最近多いよな！Σ(･ω･ﾉ)ﾉ！
おかげでこっちはマグロでできるし、良い事づくしなのだわｗｗｗ
http://hevry.net/sanma/rOKaO/
オナホ〜ルは勘弁ｗｗpEorc - 伊藤 Home
2008/06/25 (Wed) 17:35:19
今週は、旅行に来てた大阪の女の子達から
お呼び出しがかかって4人分たっぷり抜かれてきました！！ｗｗ
お盆前に、いいお小遣い稼ぎになったよ！
▼これこれ
http://panco.rimrom.net/pEorc/
ちょっとエッチな仲良し２人組 - 由那＆実花
2008/06/04 (Wed) 13:18:27
日常の写ﾒはもちろん
ﾃﾞｼﾞｶﾒ撮影写真館アリ☆
見られたりするのが好きなので
結構ｷﾞﾘｷﾞﾘまで出してます笑
みんなとの交流の場BBSもちゃんとあります☆
私たちが載る予定の雑誌やテレビ番組も随時紹介します♪
でわでわ待ってマースｗ
http://h2.happymeeting.mobi
こんなサイトだけどいいかな？ - 自称エッチOLあさみ Home
2008/05/31 (Sat) 15:26:00
管理人様、失礼しま〜す！
初めてサイト作ったんだけど普通の内容じゃつまらないから、ちょっと過激？なのにしてみました（笑）
ブログも前から書いてたやつなんだけど、いつの間にかエログに・・・（苦笑）
こんなあさみだけど、私の日常覗きに来てね！！荒らしはナシでね（笑）
週末とかいつも暇だから遊べる人も募集してま〜す！！
http://yasasi.freeing.name/
ＳＥ×で儲けるっちゅー噂についてrxDkF - 矢島 Home
2008/05/14 (Wed) 06:05:15
もっと早くやってりゃよかったぁぁぁああ！！
オナ二─見せ付けられて、30分我慢させられた時は
気が狂いそうだったけども、初日一回で収入10万超えたしな（笑
↓これ
http://sss.motituki.net/rxDkF/
童貞なら、こっちの方がもっと高くいけるぞ。
http://w-flog.net/dt/rxDkF/
ちょｗｗｗｗｗぉまｗｗnYRFp - 秋刀魚 Home
2008/05/02 (Fri) 11:26:12
俺は完全マグロ状態で寝てただけなのに
女の方は勝手に5回以上ガクガクガクガク逝ってたぞｗｗｗ
これで5万もらってて、マジで良いの？？ｗｗｗ
⇒ http://sarome.dvxvb.net/nYRFp/
n-1個の超平面達の交わりが 1次元 - U
2007/01/10 (Wed) 02:05:56
交線の方向ベクトル From：UNI 理工学部 1年
次の２平面の交線の方向ベクトルを求めよ。
2x+3y-4z+2=0
4x-8y-5z-3=0
お願いします！教えてください☆☆
N様の解答；
2x+3y-4z+2=0、4x-8y-5z-3=0 の法ベクトルは夫々 (2,3,-4)、(4,-8,-5) ですから、
その交線は、この二つのベクトルに直交しています。
よって、その方向ベクトルは、(2,3,-4)×(4,-8,-5) （× はベクトル積） です。
-----------------------------------------------------
In[2]:=
CrossProduct[{2, 3, -4}, {4, -8, -5}]
Out[2]=
{-47, -6, -28}
-----------------------------------------------------
で完璧なのですが、ベクトル積の概念をもう一次元上げたときに
質問者が 惑うと 思われるので 蛇足をつけ加えることを 許容下さい；
In[3]:=
z = 1;
Solve[{2*x + 3*y - 4*z + 2 == 0,
4*x - 8*y - 5*z - 3 == 0}, {x, y}]
Clear[x, y, z]
Out[4]=
{{x -> 10/7, y -> -(2/7)}}
In[6]:=
{10/7, -(2/7), 1};
In[7]:=
z = 7;
Solve[{2*x + 3*y - 4*z + 2 == 0,
4*x - 8*y - 5*z - 3 == 0}, {x, y}]
Clear[x, y, z]
Out[8]=
{{x -> 23/2, y -> 1}}
In[10]:=
{23/2, 1, 7};
In[11]:=
Simplify[-{10/7, -(2/7), 1} + {23/2, 1, 7}]
%*14
Out[11]=
{141/14, 9/7, 6}
Out[12]=
{141, 18, 84}
In[13]:=
-3*CrossProduct[{2, 3, -4}, {4, -8, -5}]
CrossProduct[{2, 3, -4}, {4, -8, -5}]
Out[13]=
{141, 18, 84}
Out[14]=
{-47, -6, -28}
--------------もう一次元上げたときに ;---------------
In[15]:=
w = 7;
sol1 = Solve[{x + y + z + 7*w == 1,
2*x + 3*y - 4*z + 5*w + 2 == 0,
4*x - 8*y - 5*z + 3*w - 3 == 0},
{x, y, z}]
Clear[x, y, z, w]
Out[16]=
{{x -> -(277/9), y -> -(19/3),
z -> -(98/9)}}
In[18]:=
{-(277/9), -(19/3), -(98/9), 7};
In[19]:=
w = 19;
s0l2 = Solve[{x + y + z + 7*w == 1,
2*x + 3*y - 4*z + 5*w + 2 == 0,
4*x - 8*y - 5*z + 3*w - 3 == 0},
{x, y, z}]
Clear[x, y, z, w]
Out[20]=
{{x -> -(2291/27), y -> -(149/9),
z -> -(826/27)}}
In[22]:=
{-(2291/27), -(149/9), -(826/27), 19};
In[23]:=
Simplify[-{-(277/9), -(19/3), -(98/9), 7} +
{-(2291/27), -(149/9), -(826/27), 19}]
27*%
Out[23]=
{-(1460/27), -(92/9), -(532/27), 12}
が 方向vector です （乞う 許容）
Out[24]=
{-1460, -276, -532, 324}
が 方向vector です （ 乞う 許容 N様 ）
複T - U
2006/12/08 (Fri) 12:17:18
Clear[AA, BB, CC, DD, EE, m, n, a, b]
A = 1; B = 0;
Expand[{A*x^4 + B*x^3 + CC*x^2 + D*x + EE - (m*x + n), (x - a)^2*(x - b)^2}]
{EE - n + D*x - m*x + CC*x^2 + x^4, a^2*b^2 - 2*a^2*b*x - 2*a*b^2*x +
a^2*x^2 + 4*a*b*x^2 + b^2*x^2 - 2*a*x^3 - 2*b*x^3 + x^4}
EE - n + D*x - m*x + CC*x^2 + B*x^3 + A*x^4 - (a^2*b^2 - 2*a^2*b*x -
2*a*b^2*x + a^2*x^2 + 4*a*b*x^2 + b^2*x^2 - 2*a*x^3 - 2*b*x^3 + x^4)
-a^2*b^2 + EE - n + 2*a^2*b*x + 2*a*b^2*x + D*x - m*x - a^2*x^2 - 4*a*b*x^2 -
b^2*x^2 + CC*x^2 + 2*a*x^3 + 2*b*x^3
pp = %
-a^2*b^2 + EE - n + 2*a^2*b*x + 2*a*b^2*x + D*x - m*x - a^2*x^2 - 4*a*b*x^2 -
b^2*x^2 + CC*x^2 + 2*a*x^3 + 2*b*x^3
Table[Coefficient[pp, x, k], {k, 0, 4}]
{-a^2*b^2 + EE - n, 2*a^2*b + 2*a*b^2 + D - m, -a^2 - 4*a*b - b^2 + CC,
2*a + 2*b, 0}
Solve[% == {0, 0, 0, 0, 0}, {a, b, m, n}]
{{m -> D, n -> 1/4*(-CC^2 + 4*EE), a -> -((I*Sqrt[CC])/Sqrt[2]),
b -> (I*Sqrt[CC])/Sqrt[2]}, {m -> D, n -> 1/4*(-CC^2 + 4*EE),
a -> (I*Sqrt[CC])/Sqrt[2], b -> -((I*Sqrt[CC])/Sqrt[2])}}
m*x + n /. {m -> D, n -> 1/4*(-CC^2 + 4*EE)}
1/4*(-CC^2 + 4*EE) + D*x
----------------------------------------------------
A = 1; B = 0; CC = -3; DD = 2; EE = 0;
{A*x^4 + B*x^3 + CC*x^2 + DD*x + EE, 1/4*(-CC^2 + 4*EE) + DD*x}
pl = Plot[{A*x^4 + B*x^3 + CC*x^2 + DD*x + EE, 1/4*(-CC^2 + 4*EE) + DD*x},
{x, -2.3, 2.3}, AspectRatio -> Automatic]
Cardioid - U
2006/11/16 (Thu) 12:03:09
Cardioid Evolute 等へ
http://mathworld.wolfram.com/CardioidEvolute.html
やさしいキスをして - U
2006/11/15 (Wed) 23:48:32
オトナ も ヨロコブ アニメ が在りましたので.
まさに 動きつつ やさしいキスをして ですね
動く超平面 が 超曲面（楕円）に やさしいキスをして＜接し＞
やさしいキスをして の検索結果 約 66,200 件
http://www.universal-music.co.jp/dct/upch5255.html
http://xahlee.org/SpecialPlaneCurves_dir/Ellipse_dir/_z_ellipse_tan_const.html
<--- Givens: A circle K with center F1. A point F2 inside the circle. A point P on the circle. Now, Let T be a line that bisects line[C,F2]. Let Q be the intersection between T and line[P,F1]. As P moves around the circle, the traces of Q is an ellipse with focus F1 and F2 and dist[F1,P] being its distance sum.
Proof: We want to prove that dist[F1,Q]+dist[F2,Q]==dist[F1,P]. Since Q lies on the line T, and T bisects line[P,F2], thus dist[Q,P]==dist[Q,F2]. Since Q also lies on segment[P,F1], so dist[F1,Q] + dist[Q,P] == dist[F1,P]. Combine the above equation together shows dist[F1,Q]+dist[F2,Q]==dist[F1,P].
キスと云えば ；
contact number kissing number の検索結果 約 3,820,000 件
例えば ；
http://mathworld.wolfram.com/KissingNumber.html
http://plus.maths.org/issue23/features/kissing/
包絡線の媒介変数表示 - U
2006/11/14 (Tue) 20:34:12
http://www.f.waseda.jp/ksuga/2005chap18.pdf
の 手法で 具体的に （包絡線が 青色の） 楕円の パラメター表示を 致しました。
包絡線として - U
2006/11/13 (Mon) 19:21:07
私も 模倣いたしました。
ご笑覧下さい；
円内の 一赤点 を 固定し、
円周上の紫点達と赤点を結ぶ線分達の（草色中点）垂直２等分線達
が やさしく 包んで 生まれる 楕円 を。
ーーーーーーーーーーーーーーーーーーーーーーーー
（ 今を生きたい 刺激的な ） 記事 ；
ダルブーの追悼記事 ：
http://www.math.kobe-u.ac.jp/HOME/sasaki/darf.pdf
これには 少し触れた 包絡線 包絡面 .... も 論じられて いる 筈 です。
Hom非隠匿 - U
2006/11/11 (Sat) 22:16:11
極限、瞬間の速さ、微分係数の３っつをどんな順番でどんな風に教えるのかが難しい。
年によっても、クラスによってもそのときの気分で変わってしまう。
を 拝聴し ； 速度vector から 入り；
等速 円運動 が 一番身近で 重要なので 先ず これから......:
t--F-->(Cos[t],Sin[t]) ----> Cos[t]+I*Sin[t]
(<===必ず ペアで iでカタク結ばれ 引き離さないで!)
初学者に 速度vector dF/dt を 直観的に 把握 するのに 抵抗が∃？
{D[Cos[t] + I*Sin[t], t], I*(Cos[t] + I*Sin[t])} // Simplify
={\[ImaginaryI] Cos[t] - Sin[t], \[ImaginaryI] Cos[t] - Sin[t]}
-------------------------------------------------------------
引き離し dSin/dt に 循環論法避け 言及 ； （をご覧になり 上と対比願います）
http://letsphysics.blog17.fc2.com/blog-entry-127.html#comment
---------------------------------------------------------------
スカラー値函数fより vector値函数、vector場 に
馴染んでいる筈 ；ジャンケンホイ あっち向いて ホイ とか 幼少時から
年によっても、クラスによってもそのときの気分で変わってしまう そうで 真摯に
vector 値 函数 F の導値 を全面に 押し出し（隠匿せず）
Hom(Tp(M),TF(p)(N))
本音で 残りの講義をなさって ください！
仮令 スカラー値函数fで あつても 基 1 を 省略せず 1--f'(x)--->f'(x)1
と Hom 明記 なさって 下さい！^(2006)
双曲線上の格子点 - U
2006/10/15 (Sun) 23:59:28
3x+2y=-12a
2x+ay=6
を満たすx,yが正の整数であるようなaの整数値を求めよ。
答a=-2,-7
導出について - U
2006/10/13 (Fri) 21:50:46
加法定理に言及されておられるので；
http://blog.goo.ne.jp/kaetzchen/e/37220e248d8c706a9094ff7ee3cc8ef6
2006年08月24
------------------------------------------------
もっとも自然な 発想を此処に 掲載します （写像の行列表現は微塵も表にださず）
この もっとも自然な 発想を 悉皆 の 教科書に
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
掲載して欲しいと 願う者 です。
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
線型作用素 r(t)の
個性のみでの導出に 賛同イタダき たいのです。
この自然な 発想を 広めて いただきたい。
＠＠＠＠＠＠＠＠＠＠＠＠＠＠＠＠＠＠
R t--r-->r(t) Lie群 SO(2)の元
R^2------->R^2
回転が 線型作用素であることほど
自明なことはない；
L1; vector v1,v2 を加えて回したものは （即 応答在り；）
回して加えたものに等しい （パフォーマンスで即可）
L2; r(t)(kv1)=kr(t)(v1) (<--- 自明 トリビア熟知の学セイ）
自明な L1,L2 のみを 使用するのですから 何ら 技巧も無く 超自然な導出。
長廣舌を詫びます； 一言で 済む 話； r は Hom(R,S(2)) の元。
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
（ Rの元t--r-->r(t)はSO(2)の元 ）
（ 他の多様な 加法定理の導出 との 比較をも ）
------------------------------------------------
関連することは 例えば ； 数学のいずみ の
http://www.nikonet.or.jp/spring/gousei/gousei.htm
達に 在りますが 腑に 落ちよう が 違い ます。
誰でもしたくなる発想で; - U
2006/10/03 (Tue) 20:32:51
Clear[a, b, t]
f[a_, b_] := 1/2*(-2 + a - 2*b - 2*a*E +
2*b*E + a*E^2)
In[12]:=
g[a_, b_] := b - (-1 + a + Log[1/a])
(* 制約条件；g[a, b]=0 のもとで 、函数f の 最大値なる 誰でも為す発想で 解いて みました
の 等位超曲面達の 図 ；
誰でもしたくなる発想で； - U
2006/10/02 (Mon) 23:51:48
http://d.hatena.ne.jp/niacin/20060928/p1#c
2006年09月28日■[数学雑記]粉飾
明日の授業の予習をしているのだが、あまりの品のなさにめまいがして我慢できずにここに書くことに。 上の0からe-1の範囲で接線を
引き、直線x=0, x=e-1 をあわせた4つの曲線で囲まれた部分の面積を最小にしたい、という問題。なんでわざわざ平行移動す
るかなあ。
を 覗き；
Clear[a, b, t]
In[2]:=
Integrate[a*x + b - Log[x + 1],
{x, 0, E - 1}]
Out[2]=
1/2*(-2 + a - 2*b - 2*a*E + 2*b*E + a*E^2)
In[3]:=
D[Log[t + 1], t]
Out[3]=
1/(1 + t)
In[4]:=
Expand[1/(1 + t)*(x - t) + Log[t + 1]]
Out[4]=
-(t/(1 + t)) + x/(1 + t) + Log[1 + t]
In[5]:=
a = Coefficient[%, x]
Out[5]=
1/(1 + t)
In[6]:=
b = -(t/(1 + t)) + Log[1 + t]
Out[6]=
-(t/(1 + t)) + Log[1 + t]
In[7]:=
Clear[a, b, t]
Solve[a == 1/(1 + t), t]
Out[8]=
{{t -> (1 - a)/a}}
In[9]:=
Simplify[-(t/(1 + t)) + Log[1 + t] /.
{t -> (1 - a)/a}]
Out[9]=
-1 + a + Log[1/a]
In[10]:=
Clear[a, b, t]
f[a_, b_] := 1/2*(-2 + a - 2*b - 2*a*E +
2*b*E + a*E^2)
In[12]:=
g[a_, b_] := b - (-1 + a + Log[1/a])
(* 制約条件；g[a, b]=0 のもとで 、函数f の 最大値なる 誰でも為す発想で 解いて みました；
ご感想を 記載くださると 嬉しいのですが.... *)
In[13]:=
{D[g[a, b], a], D[g[a, b], b]}
Out[13]=
{-1 + 1/a, 1}
In[14]:=
{D[f[a, b], a], D[f[a, b], b]}
Out[14]=
{1/2*(1 - 2*E + E^2), 1/2*(-2 + 2*E)}
In[15]:=
eqn = {D[f[a, b], a] == λ*D[g[a, b], a],
D[f[a, b], b] == λ*D[g[a, b], b],
g[a, b] == 0}
Out[15]=
{1/2*(1 - 2*E + E^2) == (-1 + 1/a)*λ,
1/2*(-2 + 2*E) == λ,
1 - a + b - Log[1/a] == 0}
In[16]:=
lsol = FullSimplify[
Solve[{D[f[a, b], a] ==
λ*D[g[a, b], a], D[f[a, b], b] ==
λ*D[g[a, b], b], g[a, b] == 0},
{a, b, λ}]]
Out[16]=
{{λ -> -1 + E, b -> -1 + 2/(1 + E) -
Log[2] + Log[1 + E], a -> 2/(1 + E)}}
(* ------- で 下 が コタエ a,b です ----- *)
In[17]:=
Simplify[{a, b} /. lsol]
N[%]
Out[17]=
{{2/(1 + E), -1 + 2/(1 + E) - Log[2] +
Log[1 + E]}}
Out[18]=
{{0.5378828427399902, 0.15799734969826784}}』 (2006/10/02 22:46)
pa - U
2006/09/26 (Tue) 15:03:33
pa
平行 - U
2006/09/26 (Tue) 11:17:06
http://xahlee.org/SpecialPlaneCurves_dir/Parallel_dir/parallel.html
走らせかた（媒介） 曲率半径等考え - U
2006/08/29 (Tue) 23:17:38
悲しい事故から可能な限り多くを学ばなくてはならない。
＝2006/08/29付 西日本新聞朝刊＝
シラフで運転しても、多くの悲劇が繰り返されます。
氏の新たな媒介変数表示による運転の顛末を図示致しました；
< t=-1からt=1 step 何がしで>
（曲率半径が刻々変化に対応し、ハンドルをキル 。その最中；
崩落 ちゃう 法線のホウラク線 見覚え 悉皆の人在り）
＜元の媒介変数表示では 有限時間に到達しない点にも訪問＞
変換前後 - U
2006/08/29 (Tue) 21:52:26
氏の新たな媒介変数表示の顛末を図示しました。
（変換前なら如何に図示されるでしょうか 図示お試し 無駄？）
bi- etc へ 誘惑 誘われてミタイ - U
2006/08/24 (Thu) 01:10:38
非負が問題なのでしょうが
∀x∈R;F(x)≧0⇔min[x∈R] F(x)≧0
⇔ min{ F(-1), F(1), F(a) }≧0
⇔ F(-1)≧0 ∧ F(1)≧0 ∧ F(a)≧0
（*直にも瞬時に求まるが 敢えて 割り算...*)
⇔ -8a+4≧0 ∧ 8a+4≧0 ∧ -a^4+6a^2+7≧0
⇔ a≦1/2 ∧ a≧-1/2 ∧ a^4-6a^2-7≦0
⇔ -1/2≦a≦1/2 ∧ (a^2+1)(a^2-7)≦0
⇔ -1/2≦a≦1/2 ∧ a^2-7≦0
⇔ -1/2≦a≦1/2 ∧ -√7≦a≦√7
⇔ -1/2≦a≦1/2 ；
http://mathworld.wolfram.com/Bitangent.html
を も 想起させられませんか？