[過去ログ] 高校数学の質問スレ(医者・東大卒専用) Part438 (1002レス)
上下前次1-新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
316: 2024/11/18(月)04:58 ID:GrxPVQzd(1) AAS
 数直線上に動点Pがあり、 
 時刻0には原点に居て、速度が位置の関数としてv(x)= (x-α)(x-β) で与えられているときの 
 時刻tでのPの位置を求めよ。  
  
 α=βのとき 
 x[t]= tα^2/(1+tα) 
  
 α≠βのとき 
 1/ (x-α)(x-β)= 1/(α-β)[1/(x-α) - 1/(x-β)]を使って
省1
317(1): 2024/11/18(月)07:21 ID:YOe2Q451(1) AAS
 >>314 
 Wolfram使えませんってアピール? 
318(1): 2024/11/18(月)08:34 ID:6QQp5ohs(1/2) AAS
 >>317 
 なんだよ図星か 
 出題にしろスキルにしろ色々偏ってるな 
 大学で数学履修してないんだな 
319(1): 2024/11/18(月)12:07 ID:sriHacXi(1) AAS
 >>318 
 医学部だと必要なのは統計処理だな。 
 Rが使えれば事足りる。 
320: 2024/11/18(月)12:27 ID:zvfCaBME(1) AAS
 Rなんぞ使えなくても医者が論文書くのに大概困らんやろ 
 Rのコードが書けても統計の意味わからないならゴミ生産機にしかなれない 
321: 2024/11/18(月)13:24 ID:EFXQWzbV(1/2) AAS
 Let's approach this step-by-step: 
  
     Let's make a substitution: t=−1nt=−n1 
     As n→∞n→∞, t→0−t→0− (approaching 0 from the negative side) 
     With this substitution, our limit becomes: limt→0−(1+t)−1tlimt→0−(1+t)−t1 
     Now, we can rewrite this as: limt→0−((1+t)1t)−1limt→0−((1+t)t1)−1 
     We recognize that limt→0(1+t)1t=elimt→0(1+t)t1=e, which is the definition of Euler's number. This holds true whether t approaches 0 from the positive or negative side. 
     Therefore, our limit becomes: (e)−1=1e(e)−1=e1 
322: 2024/11/18(月)13:29 ID:qEGNxEm5(1/2) AAS
 >>319 
 いくら能書き垂れようがここで無能扱いされてることに違いはないw 
323(2): 2024/11/18(月)13:33 ID:EFXQWzbV(2/2) AAS
 底辺シリツ医でRが使える医師をみたことがないな。 
  
 R(PythonでもWolframでもいいけど)が使えると、こういう計算ができるので 
 必要なスピッツや試薬の数を準備できる。 
  
 日本人の血液型はAB:B:O:A=1:2:3:4であるという。 
 無作為に何人の血液型を調べて 調べた人にすべての血液型が含まれる確率を99%以上にしたい。 
 何人以上調べればよいか?  
 99%を越えたときの確率を分数で算出せよ。 
324: 2024/11/18(月)14:02 ID:6QQp5ohs(2/2) AAS
 >>323 
 それを雇われ医師がやる必要はないけどな 
325: 2024/11/18(月)20:41 ID:qEGNxEm5(2/2) AAS
 >>323 
 数学スレでも脳内医者バレバレみたいだねw 
326: 2024/11/18(月)23:30 ID:F0+pha6b(1) AAS
 自分の設定と矛盾した事言ってても全く気づけないポンコツ 
327: 2024/11/19(火)03:57 ID:V8CHGcRI(1/2) AAS
 To evaluate the limit 
 limn→∞(1−1n)n,\lim_{n \to \infty} \left(1 - \frac{1}{n}\right)^n,limn→∞(1−n1)n, 
 we can recognize that this expression is related to the definition of the number eee. Specifically, we can rewrite the expression in a more convenient form. 
 First, we can use the fact that 
 (1−1n)n=((1−1n)−n)−1.\left(1 - \frac{1}{n}\right)^n = \left(\left(1 - \frac{1}{n}\right)^{-n}\right)^{-1}.(1−n1)n=((1−n1)−n)−1. 
 Now, we can take the natural logarithm of the expression to simplify the limit: 
 ln((1−1n)n)=nln(1−1n).\ln\left(\left(1 - \frac{1}{n}\right)^n\right) = n \ln\left(1 - \frac{1}{n}\right).ln((1−n1)n)=nln(1−n1).
省12
328: 2024/11/19(火)05:02 ID:V8CHGcRI(2/2) AAS
 Texコードを投稿しても表示されないなぁ。 
329: 2024/11/20(水)08:10 ID:KnDPFD/I(1/2) AAS
 pick=\(x,one=1){ 
   y=sample(x) 
   picked=y[1:one] 
   rest=y[-c(1:one)] 
   list(picked=picked,rest=rest) 
 } 
  
 f=\(){
省22
330(1): 2024/11/20(水)08:10 ID:KnDPFD/I(2/2) AAS
 4つのドアがあり、それぞれのドアの向こうには車、ヤギ、太郎くん、次郎くんががいます。 
 三郎くんはどれか1つドアを選び、それを開けて車が出たら当たりで、車をもらうことができます。 
 ヤギが出たらその時点でゲーム終了です。 
  
 人物(Xとする)が出たら、Xが新たな挑戦者となり、三郎くんは選んだドアに入り、ドアを閉め、 
 ドアの向こうで車、ヤギ、人物2人の位置をランダムにシャッフルします。 
 ここまでを1ターンとします。 
 その後はXが挑戦者となり、ゲームを続行します。
省3
331: 2024/11/20(水)18:44 ID:KZHv+5ER(1) AAS
 >>330 
 尿瓶ジジイまだ生き恥晒してたのかよ? 
332: 2024/11/21(木)18:36 ID:Ci8ztJhi(1) AAS
 尿瓶ジジイって論破されて発狂してそれもまた論破されてダンマリ決め込んでまた復活の繰り返しだな 
333(2): 2024/11/22(金)16:33 ID:2M9XV7Pv(1) AAS
 " 
 西暦2025年から西暦10000年まで2月29日が日曜日になることは何回あるか? 
 現行のグレゴリオ暦を用いて計算せよ。 
 " 
 library(lubridate) 
 wday(ymd("2016-2-29"),label=TRUE) 
 wday(ymd("2015-2-29"),label=TRUE)
省4
334: 2024/11/22(金)17:18 ID:KGSQyV3C(1) AAS
 >>333 
 スレタイすら読めない医者でも東大卒でもないアホチンパンは消えてどうぞ 
335: 2024/11/23(土)03:28 ID:qyJPztJt(1/4) AAS
 WolframのDayName関数に 
 存在しない閏年の2月29日を引数として与えるとその年の3月1日の曜日を返す仕様のようである。俺にはバクに思えるのだが。 
  
 DayName[{2025,2,29}] 
 DayName[{2025,3,1}] 
 を実行してみるとよい。 
問題 
 この仕様を利用して
省4
336: 2024/11/23(土)10:08 ID:qyJPztJt(2/4) AAS
 (1) 九九に現れる数字は1から81までである。何種類あるか? 
 (2) 1から99までの数字を2つかけてできる数は何種類あるか? 
 (3) 1から999までの数字を2つかけてできる数は何種類あるか? 
 (4) 1から9999までの数字を2つかけてできる数は何種類あるか? 
  
 R 
 calc=\(n) outer(1:n,1:n)|>as.vector()|>unique()|>length() 
 sapply(c(9,99,999,9999),calc)
省3
337: 2024/11/23(土)14:11 ID:3sUy/oAC(1) AAS
 >>333 
 意味のない問題を出題して無知と恥をアピールwww 
338: 2024/11/23(土)16:01 ID:qyJPztJt(3/4) AAS
 年賀状の3等は100枚に3枚が当たる確率である。 
 (1) 100枚の年賀状を無作為に購入したときの当たりの枚数の期待値を求めよ。 
 (2) 3等が当たっている年賀状の枚数が奇数の確率をPとする。Pは0.5より大きいか小さいか、直感で即答せよ。 
 (3) (2)の確率を分数で求めよ。 
 (4) (3)をシミュレーションで検証してみよ。 
p=3/100; 
 Table[Binomial[100,2n-1] p^(2n-1) (1-p)^(100-(2n-1)),{n,1,50}] // Total
省2
339(1): 2024/11/23(土)16:02 ID:qyJPztJt(4/4) AAS
 意味のある問題(シリツ卒には解けないようだ) 
 採決スピッツや試薬をどれだけ準備すべきかが算出できる。 
日本人の血液型はAB:B:O:A=1:2:3:4であるという。 
 無作為に何人かの血液型を調べて、 調べた人にすべての血液型が含まれる確率を99%以上にしたい。 
 (1) 何人以上調べればよいか? 
 (2) 99%を越えたときの確率を分数で算出せよ。 
340: 2024/11/23(土)16:15 ID:IPIzs9Xw(1) AAS
 >>339 
 ここでいくら発狂しても相手にされないみたいだねw 
 実に哀れ 
 自分でも解けないんだろ?というか問題として成立してないw 
341: 2024/11/26(火)20:42 ID:HQUgcf8k(1) AAS
 意味のある問題と思い込めるってwww 
 並外れた低脳アピールwww 
342: 2024/11/29(金)06:08 ID:d3rJHsIX(1) AAS
 # 10桁のカプレカー数を列挙するプログラムを作り実行せよ 
  
 n=10 
 library(RcppAlgos) 
 is.kaprekar=\(m){ 
   IntegerDigits=\(n) as.integer(unlist(strsplit(as.character(n),''))) 
   le=length(m) 
   mu=10^((le-1):0)
省17
343: 2024/11/29(金)16:54 ID:a8qsJeEV(1) AAS
 画像リンク[png]:i.imgur.com 
344: 2024/11/30(土)07:28 ID:L4mkprla(1/6) AAS
 hex[x_]:=ResourceFunction["HexConvert"][x]; 
  
 start="100"; 
 end="fff"; 
 d=hex /@ Range[hex[start],hex[end]]; 
 s=StringSplit[#,""]& /@ d; 
 KaprekarHexQ[x_] := hex[hex@StringJoin@ReverseSort@x - hex@StringJoin@Sort@x] == StringJoin@x; 
 StringJoin /@ Select[s,KaprekarHexQ] 
345: 2024/11/30(土)10:21 ID:L4mkprla(2/6) AAS
 (* 16進法でn桁のカプレカ数を求める *) 
 n=6 
 hex[x_]:=ResourceFunction["HexConvert"][x]; 
 s=ResourceFunction["OrderlessCombinations"][hex /@ Range[0,15],{n}]; 
 KaprekarHexQ[x_] := ( 
     d=hex@StringJoin@ReverseSort@x - hex@StringJoin@Sort@x; 
     lid=StringSplit[hex@d,""];
省4
346: 2024/11/30(土)14:45 ID:L4mkprla(3/6) AAS
 b進法、n桁のカプレカ数を求めるように拡張 
  
 (* b進法でn桁のカプレカ数を返す b <= 36 *) 
 solve[b_,n_]:=( 
 dec2n[x_] :=( 
   r=List@Mod[x,b]; 
   q=Floor[x/b]; 
   While[q > 0,PrependTo[r,Mod[q,b]];q=Floor[q/b]];
省22
347: 2024/11/30(土)16:16 ID:BMBeqwqc(1/2) AAS
 (* 
 疑似ヴァンパイア数(Pseudovampire numbers)は、「数字を2等分」という縛りを無くした数である。 
 例えば126 = 6×21など。  
  
 外部リンク:ja.wikipedia.orgヴァンパイア数 
  
 問題 3桁の疑似ヴァンパイア数を列挙せよ。 
 *) 
 f[n_]:=(
省12
348: 2024/11/30(土)17:54 ID:L4mkprla(4/6) AAS
 (* 
 問題 5桁の疑似ヴァンパイア数を列挙せよ。 
 *) 
 f14[n_]:=( 
     d=IntegerDigits[n]; 
     p=Permutations[d,{5}]; 
     prd=#[[1]]*(1000 #[[2]]+100 #[[3]]+10 #[[4]]+#[[5]])& /@p;
省11
349: 2024/11/30(土)17:55 ID:L4mkprla(5/6) AAS
 {{5, 2051, 10255}, {5, 2105, 10525}, {9, 1251, 11259}, {8, 1481, 11848},  
   
 >   {6, 2001, 12006}, {6, 2010, 12060}, {3, 4128, 12384}, {5, 2501, 12505},  
   
 >   {5, 2510, 12550}, {5, 2519, 12595}, {6, 2100, 12600}, {6, 2127, 12762},  
   
 >   {3, 4281, 12843}, {5, 2591, 12955}, {3, 4515, 13545}, {3, 5001, 15003},  
   
 >   {3, 5010, 15030}, {6, 2541, 15246}, {3, 5100, 15300}, {3, 5145, 15435},
省5
350(1): 2024/11/30(土)17:55 ID:L4mkprla(6/6) AAS
 f23[n_]:=( 
     d=IntegerDigits[n]; 
     p=Permutations[d,{5}]; 
     prd=(10 #[[1]]+#[[2]])(100 #[[3]]+10 #[[4]]+#[[5]])& /@p; 
     i=Position[prd,n]; 
     ans={}; 
     If[i!={},
省21
351(1): 2024/11/30(土)19:19 ID:xA0BaYQb(1/3) AAS
 >>350これには完全ダンマリで草 
  
 954:卵の名無しさん:2024/11/30(土) 10:54:08.14 ID:Wtu16ESx 
 >>951 
 まあお前と違って俺は一回200万ぐらい病院に入る治療出来るからそういうのなら病院にとって呼ぶ価値あるけどな 
 車で行ってるから交通費も貰ってないけど 
 一回10万でやってあげてるよ 
 んで、お前は?GFで数件覗くだけ?
省4
352(4): 2024/11/30(土)20:02 ID:BMBeqwqc(2/2) AAS
 >>351 
 1日15件くらいやってますが? 
 昔は20件を超えることもあったな。 
353: 2024/11/30(土)20:20 ID:xA0BaYQb(2/3) AAS
 >>352 
 一日15件やってもせいぜい十数万だからそんなコストかけて雇う価値ないだろうなww 
354: 2024/11/30(土)20:53 ID:xA0BaYQb(3/3) AAS
 >>352 
 なんで医者板で直接言えないのかな? 
 脳内医者ってまたボコボコにされるのが目に見えてるからかな?ww 
355: 2024/11/30(土)22:09 ID:7d0ZfVfE(1) AAS
 >>352 
  
 967:卵の名無しさん:[sage]:2024/11/30(土) 21:57:37.31 ID:7TzF2IEd 
 湘南鎌倉総合病院には元旭川医科大学勤務で国立大の弘前大学卒の元AV女優浅丘りなこと田中茉里子(旧姓古郡)がいるもんね 
 外部リンク:www.skgh.jp 
 外部リンク:www.suruga-ya.jp 
 外部リンク[html]:www.oma-aozora.jp 
  
 はい、いつものコピペダンマリきたw 
356: 2024/12/01(日)08:47 ID:h0Y8DNCF(1) AAS
 >>352 
 この、偽医者なんか必死だな 
 何故か逆鱗に触れてしまったようだ 
357(1): 2024/12/01(日)10:07 ID:URtmhVxU(1/7) AAS
 f(x,y)= x^y+y^x 
 0 <= x <= 1 かつ 0 <= y <= 1 
 とする 
 (1) z=f(x,y)を図示せよ 
 例 画像リンク[gif]:i.imgur.com 
 (2) z=f(x,y)とx-y平面で囲まれた図形の体積を求めよ 
 (3) z=f(x,y)の面積を求めよ(有効数字3桁の近似値でよい) 
358: 2024/12/01(日)10:09 ID:URtmhVxU(2/7) AAS
 f(x,y)= x^y+y^x 
 0 <= x <= 1 かつ 0 <= y <= 1 
 とする 
 (1) z=f(x,y)を図示せよ 
 例 画像リンク[gif]:i.imgur.com 
 (2) z=f(x,y)とx-y平面で囲まれた図形の体積を求めよ 
 (3) z=f(x,y)の面積を求めよ(有効数字3桁の近似値でよい)
省18
359: 2024/12/01(日)10:23 ID:rRY5OR0u(1/2) AAS
 >>357 
  
 2chスレ:hosp 
  
 968:卵の名無しさん:2024/11/30(土) 22:02:25.06 ID:dp7m04yN 
 >>966 
 こっちだとフルボッコにされるからって情けないよな… 
  
 969:卵の名無しさん:2024/12/01(日) 01:00:00.23 ID:tCw/HuPn 
 1人で上部内視鏡1日15件はねーよ
省2
360: 2024/12/01(日)13:24 ID:URtmhVxU(3/7) AAS
 ナルシシスト数(ナルシシストすう、英: narcissistic number)とは、n 桁の自然数であって、その各桁の数の n 乗の和が、元の自然数に等しくなるような数をいう。 
 例えば、1^3 + 5^3 + 3^3 = 153 であるから、153 はナルシシスト数である。 
 .... 
 十進法に限らず、他の基数においても同様にナルシシスト数を定義できる 
  
 問題  
 16進法で4桁までのナルシスト数は何個あるか? 
 すべて列挙せよ。
省15
361(1): 2024/12/01(日)16:43 ID:URtmhVxU(4/7) AAS
 (* decimal integer to b-based digits 10進法xをb進法表記の文字リストに返還*) 
 i2d[x_,b_:16] :=( 
   digits=Flatten@{"0","1","2","3","4","5","6","7","8","9",Alphabet[]}; 
   r=List@Mod[x,b]; 
   q=Floor[x/b]; 
   While[q > 0,PrependTo[r,Mod[q,b]];q=Floor[q/b]]; 
   digits[[r+1]]
省19
362: 2024/12/01(日)17:01 ID:rRY5OR0u(2/2) AAS
 >>361 
 どうせ高校生にすらバカにされてるからもう出てこなくていいよ 
363(1): 2024/12/01(日)19:45 ID:URtmhVxU(5/7) AAS
 外部リンク:ja.wikipedia.orgレイランド数 
  
 レイランド数(レイランドすう、英: Leyland number)は、数論において次の形で表される数 
     x^y + y^x  
 x と y は1より大きい整数 
 .... 
 また加算の交換性のために x ≥ y の条件は通常レイランド数の重複をさけるために加えられる。(よって 1 < y ≤ x を用いる)  
  
 外部リンク:oeis.orgに
省12
364: 2024/12/01(日)20:07 ID:URtmhVxU(6/7) AAS
 >>363 
 レイランド素数はレイランド数でもあり素数でもある数。 
 外部リンク:oeis.org 
 に例示してある最大の数は 
 5052785737795758503064406447721934417290878968063369478337 
 である。 
  
 問題
省2
365: 2024/12/01(日)20:08 ID:URtmhVxU(7/7) AAS
 想定解 
  
 205688069665150755269371147819668813122841983204711281293004769,  
   
 3329896365316142756322307042065269797678257903507506764421250291562312417,  
  
 おまけ 
 814539297859635326656252304265822609649892589675472598580095801187688932052096060144958129 
366: 2024/12/02(月)06:58 ID:5RqvHzG8(1/3) AAS
 Leyland[n_]:=( 
     ymax=Floor@y /. NSolve[2 y^y == n && y>1y,Reals][[1]]; 
     xmax=Floor@x /. NSolve[x^2+2^x==n && x>1x,Reals][[1]]; 
     z=Flatten[Table[{x^y+y^x,x,y},{x,2,xmax},{y,2,ymax}],1]; 
     Select[z,#[[1]]==n&] 
 ) 
 Leyland[42832853457545958193355601] 
367: 2024/12/02(月)07:11 ID:5RqvHzG8(2/3) AAS
 レイランド数(レイランドすう、英: Leyland number)は、数論において次の形で表される数 
 x^y + y^x 
 x と y は1より大きい整数 
 .... 
 また加算の交換性のために x ≥ y の条件は通常レイランド数の重複をさけるために加えられる。(よって 1 < y ≤ x を用いる) 
  
 ある数 nがレイランド数であるかを判定して、レイランド数であれば n = x^y + y^x  (但し1 < y ≤ x)となる x,y を算出する 
 操作をレイランド分解と呼ぶことにする。
省5
368: 2024/12/02(月)07:28 ID:5RqvHzG8(3/3) AAS
 LeylandQ[n_]:=( 
     ymax=Floor@y /. NSolve[2 y^y == n && y>1y,Reals][[1]]; 
     xmax=Floor@x /. NSolve[x^2+2^x==n && x>1x,Reals][[1]]; 
     z=Flatten@Table[x^y+y^x,{x,2,xmax},{y,2,ymax}]; 
     ContainsAny[z,{n}] 
 ) 
 LeylandQ[42832853457545958193355601] 
369: 2024/12/02(月)19:24 ID:530Brai+(1) AAS
 尿瓶ジジイ、医者板でダンマリ決め込むしかないw 
370: 2024/12/03(火)14:26 ID:xACthNhN(1) AAS
 Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit) 
 Copyright 1988-2023 Wolfram Research, Inc. 
  
 In[1]:= nn=1234; 
  
 In[2]:= n=5; 
  
 In[3]:= m=6; 
  
 In[4]:= ass2list[ass_] := Select[Table[{key,ass[key]},{key,0,m}],IntegerQ[#[[2]]]&] (* assosiation to list ,key:[0,m] *)
省16
371: 2024/12/04(水)00:16 ID:FPvs5P9c(1) AAS
 高校数学スレじゃ誰も構ってもらえず息絶えたみたいだね 
372: 2024/12/04(水)09:35 ID:M2J+bJMI(1/2) AAS
 (* 1から100までの整数から異なる10個を選び、その合計が5の倍数になる確率を求めなさい。 *) 
 solve[nn_,n_,m_]:=( 
     ass=Counts[#]& /@ Flatten[Table[Sort /@ IntegerPartitions[x,{n},Range[0,m-1]],{x,m*Range[0,n-1]}],1]; 
     li=KeyValueMap[List,#]& /@ ass; 
     {q,r}=QuotientRemainder[nn,m]; 
     c=Flatten@{Table[q+1,r],Table[q,m-r]}; 
     m2c[x_] :=(
省7
373(1): 2024/12/04(水)16:35 ID:M2J+bJMI(2/2) AAS
 Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit) 
 Copyright 1988-2023 Wolfram Research, Inc. 
  
 In[1]:= solve[nn_,n_,m_]:=( 
             ass=Counts[#]& /@ Flatten[Table[Sort /@ IntegerPartitions[x,{n},Range[0,m-1]],{x,m*Range[0,n-1]}],1]; 
             li=KeyValueMap[List,#]& /@ ass; 
             {q,r}=QuotientRemainder[nn,m]; 
             c=Flatten@{Table[q+1,r],Table[q,m-r]};
省10
374: 2024/12/05(木)08:04 ID:eKN5wIeH(1) AAS
 >>373高校生相手にバカにされてそんなに楽しい? 
375: 2024/12/05(木)12:36 ID:YJ2FHyON(1/2) AAS
 (* 1から2024までの整数から12個を選び(同じ数があってもよい)その合計が5の倍数になる確率を求めなさい。 *) 
 solve[nn_,n_,m_]:=( 
     t1=Flatten[Table[Sort /@ IntegerPartitions[x,{n},Range[0,m-1]],{x,m*Range[0,n-1]}],1]; 
     t2=Table[If[#==0,m,#]& /@ t1[[j]],{j,1,Length@t1}]; 
     {q,r}=QuotientRemainder[nn,m]; 
     c=Flatten@{Table[q+1,r],Table[q,m-r]}; 
     Total@Table[n!/Times@@(Values@Counts@t2[[j]]!) Product[c[[i]],{i,t2[[j]]}],{j,1,Length@t2}]/nn^n
省1
376(1): 2024/12/05(木)13:46 ID:YJ2FHyON(2/2) AAS
 数を小さくしてソルバーと総当たり解を照合。 
  
 In[3]:= nn=123; 
  
 In[4]:= n=4; 
  
 In[5]:= m=5; 
  
 In[6]:= solve[nn,n,m]
省9
377(1): 2024/12/05(木)17:56 ID:ynBzGGEQ(1/2) AAS
 >>376 
  
 847:132人目の素数さん:2024/12/05(木) 17:46:08.46 ID:oVgZjm9p 
 常識があれば出来る問題 
 9時~12時 
 13時~16時の間に上部内視鏡検査を行いたい 
 内視鏡のカメラは3台あり洗浄に1時間かかります 
 患者さんに検査前の説明をするのが5分
省3
378: 2024/12/05(木)20:02 ID:Kxn4SMrl(1) AAS
 >>377 
 内視鏡洗浄に1時間かかるわけがない。 
379: 2024/12/05(木)20:34 ID:ynBzGGEQ(2/2) AAS
 見逃したくさんありそうだし不潔だねww 
380(1): 2024/12/06(金)04:11 ID:YSI2tqZx(1) AAS
 検査時間が5分をきると見逃しが増えるというデータがある。 
 俺はだいたい7分だな。 
 鏡内侍という洗浄機は鉗子孔の自動ブラシ洗浄機能も備えていて洗浄時間短縮に寄与する。 
381: 2024/12/06(金)06:39 ID:ujP1NFyB(1) AAS
 R  
 # 2つの日付時刻を指定  2024/12/05(木) 06:04:29.15 
 date1 <- as.POSIXct("2024-12-06 00:00:00") 
 date2 <- as.POSIXct("2024-12-05 06:04:29.15") 
  
 # 日付時刻の差を秒単位で計算 
 options(digits=10) 
 (interval <- difftime(date2, date1, units = "secs"))
省5
382(1): 2024/12/06(金)07:45 ID:vLOIX3xc(1) AAS
 >>380 
 7分だと1日20件無理じゃん 
 嘘ついたってこと? 
383(2): 2024/12/06(金)07:58 ID:Ur8HGrQ0(1/3) AAS
 >>382 
 健診なら1時間に5件、半日で20件くらい普通。 
384: 2024/12/06(金)08:02 ID:Ur8HGrQ0(2/3) AAS
 昔の忙しいバイト先でsedationで検診やっていたときは 
 検査後の説明は別の医師がやっていた。そうしないと数がはけない。 
 最近は数が増えて検査医増やして2列同時並行にしていると言ってたな。 
385: 2024/12/06(金)08:03 ID:Ur8HGrQ0(3/3) AAS
 >>383 
 内視鏡は7本、今はもっと増えているかも。 
386(1): 2024/12/06(金)19:31 ID:qbKrrjGS(1) AAS
 >>383 
 入れ替えも含めてそんなにできるわけないだろ 
 早期癌見逃すだろ絶対 
 脳内医療もいい加減にしろ 
387(1): 2024/12/07(土)01:03 ID:IqLiU+V6(1) AAS
 >>386 
 検診部に内視鏡センターを置いているような施設では普通。内視鏡スレではベルトコンベア内視鏡と称されていた。 
 受付説明、前処置、検査、内視鏡洗浄を別の部屋で同時並行でできる設備とそれを運営できる熟練スタッフが必要。 
 所見記載の電子カルテのフォーマットも熟れている。 
388: 2024/12/07(土)01:26 ID:BxWxOKoF(1/3) AAS
 >>387 
 病気見逃しそうに関してはダンマリかよ 
389(1): 2024/12/07(土)05:58 ID:78hDh7jB(1) AAS
 内視鏡で観察していた時間が7分、説明に要した時間が7分でした所要時間は? 
  
 ある底辺シリツ医の場合:14分 
 俺の場合:7分 
  
 ∵俺は観察中にリアルタイムで説明しているから。 
  
 こういう工夫で1時間5人の枠はこなせる。  
  
 観察時間の短縮でなく、それ以外の作業を同時並行することで全所要時間を短縮。 
 そういうことすら理解できないから、Fランシリツにしか入れないのだろう。 
390: 2024/12/07(土)08:16 ID:BxWxOKoF(2/3) AAS
 >>389 
  
 42:卵の名無しさん:2024/12/07(土) 07:01:36.65 ID:+iViUeCm 
 >>39 
 7分で観察出来ても1時間で5件は無理だっつーの 
 そもそも全員7分でいけるわけないだろ生検とか必要な人もいるんだし 
 他に医者がいれば話は別だがお前しかおらんのだろ?(設定上) 
 そもそもレポートとかどうすんだよ
省7
391: 2024/12/07(土)10:48 ID:xtC19jyX(1/2) AAS
 m=50+1 
 n=2^Ceiling[Log[2,m]]; 
 t1=Table[Reverse@IntegerDigits[x,2],{x,1,n-1}]; 
 ans=Table[{},Log[2,n]]; 
 For[i=1,i<m,i++,AppendTo[ans[[#]],i]& /@ Flatten@Position[t1[[i]],1]]; 
 res=Reverse[ans]; 
 MatrixForm@res 
392(1): 2024/12/07(土)12:16 ID:xtC19jyX(2/2) AAS
 ある仮想疾患Fラン病(別名:チンパンフェチ病)を考える。 
  
 実験のために抗原陰性の血清50検体を準備していたところ、手違いで抗原陽性の検体が1つ紛れて51検体になった。 
 検体量は十分あるため抗原の有無の検査を繰り返すことは可能である。 
 複数の検体を混ぜて検査することも可能である。 
 検査1回に10万円かかるとする。 
 最低の費用で抗原陽性の検体を同定する方法を記載せよ。  
  
 Rで検体グループ分けを表示させる
省9
393: 2024/12/07(土)15:19 ID:BxWxOKoF(3/3) AAS
 >>392 
 医者板の正論は一切反論できずにダンマリ決め込んでるみたいだねw 
 素人にも総ツッコミじゃねーかw 
394(2): 2024/12/08(日)06:14 ID:DaR/tBAf(1) AAS
 実験のために抗原陰性の血清2024検体を準備していたところ、手違いで抗原陽性の検体が1つ紛れて2025検体になった。 
 検体量は十分あるため抗原の有無の検査を繰り返すことは可能である。 
 複数の検体を混ぜて検査することも可能である。 
 抗原検査機器は同時並行で複数の検体を検査できるが、1回しか稼働できない。 
 また検査費用は検体1つにつき10万円かかるとする。 
  
 最低の費用で抗原陽性の検体を同定する方法を記載せよ。  
  
 Clear[{m,n,t1,ans,solve,re,result,x}]
省14
395: 2024/12/08(日)06:18 ID:tGDQQ3+X(1) AAS
 内視鏡の件でフルボッコ、リファンピシンでも突っ込まれて保険適応やらカテーテルの件でも無知晒して… 
 偽医者か無能医者かわからんがよく恥ずかしく無いよな 
396(1): 2024/12/08(日)06:29 ID:5tcxYECw(1/2) AAS
 >>394 
 結局内視鏡の件は論破されてダンマリかよ 
上下前次1-新書関写板覧索設栞歴
あと 606 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.026s