石川 昌和 | Masakazu Ishikawa

サ道で紹介されていた神戸サウナ＆スパ。神戸三宮駅から徒歩5分程度とかなりの好立地。イメージとしては梅田の大東洋やニュージャパンのようなカプセルホテル＆サウナ。しかし、ここは大東洋もニュージャパンも超えた素晴らしいサウナだった。 施設自体が広いのかわからないが、かなりの開放感がある。サウナは大きく3種類。普通のサウナ、フィンランドサウナ（暗くてテレビなし、セルフロウリュ）そして、塩サウナ。大東洋よりも広い感じがするし、何より休憩スペースが充実してて昼寝も余裕でできる。これはリアル桃源郷。近くにあれば毎週でも行きたいけど、遠いからなぁ。でも神戸に来たらまた行きたい。 https://amufaamo.blogspot.com/search?q=%E5%A4%A7%E6%9D%B1%E6%B4%8B https://amufaamo.blogspot.com/search?q=%E3%82%B5%E3%82%A6%E3%83%8A

久しぶりに朝マック。朝マックしたのはバイクの教習所に通っている以来かもしれない。 マックドリトルを食べてみるがなんかこれじゃないかもしれない。アマジョッパイ必要ないかな。

みーとがーでんはいつも混んでいるからなかなか入れないけど、空いているときはたまに入るようにしている。ランチが最高。今日はちょっと高いロースを頼んだけど安い方と違いがよくわからん。これは安い肉も十分美味しいからだと思う。

Rで、データフレームのある列に特定の文字列を含む行のみ取得するには、いくつかの方法があります。以下で、その方法と、それぞれの特徴について詳しく説明します。 <br><br> # 方法1：grep関数 <pre class="prettyprint lang=R"> grep("文字列", 列名) </pre> この方法は、列名に指定された文字列を含む行をすべて抽出します。シンプルな方法ですが、部分一致には対応していないため、注意が必要です。 <br> 例： <pre class="prettyprint lang=R"> #データフレームの読み込み df <- read.csv("data.csv") #"A"を含む行を抽出 df_filtered <- grep("A", df$列名) #抽出結果の確認 head(df_filtered) </pre> <br><br> # 方法2：grepl関数 <pre class="prettyprint lang=R"> grepl("文字列", 列名) </pre> この方法は、列名に指定された文字列を含む行をすべて抽出します。grep関数との違いは、部分一致にも対応する点です。 <br> 例： <pre class="prettyprint lang=R"> #"A"を含む行を抽出 df_filtered <- grepl("A", df$列名) #抽出結果の確認 head(df_filtered) </pre> <br><br> # 方法3：str_detect関数 <pre class="prettyprint lang=R"> library(

Rでlistから特定の文字を含む要素を排除するには、いくつかの方法があります。 <br><br> # 方法1：grep()関数を使う grep()関数は、文字列ベクトルからパターンに一致する要素を抽出するために使用できます。この場合、パターンは除外したい文字を含む正規表現になります。 <pre class="prettyprint lang=R"> list <- c("a", "b", "c", "ab", "bc", "ac") exclude_char <- "c" filtered_list <- grep(paste0("[^", exclude_char, "]"), list, value = TRUE) print(filtered_list) #[[1] "a" "b" "ab"]] </pre> この例では、exclude_charに"c"を指定し、grep()関数で"c"を含まない要素のみを抽出しています。 <br><br> # 方法2：sapply()関数とgrepl()関数を使う sapply()関数とgrepl()関数を組み合わせて、listの各要素に対してパターンマッチングを行い、除外したい文字を含む要素を削除することもできます。 <pre class="prettyprint lang=R"> list <- c("a", "b", "c", "ab", "bc", "ac") exclude_char <- "c" filtered_list <- sapply(list, function(x) !grepl(exclud

R言語で特定の列にNAを含む行を除く方法は以下の通りです。 まず、データフレームが以下のようになっていると仮定します： <pre class="prettyprint lang=R"> df <- data.frame( col1 = c("Hello", "Good", NA, "Nice"), col2 = c("World", "Day", "Work", NA) ) </pre> 次に、col1列にNAを含む行を除きます： <pre class="prettyprint lang=R"> df <- df[!is.na(df$col1), ] </pre> このコードでは、is.na()関数を使用してcol1列にNAがあるかどうかを確認し、その結果を否定（!）しています。 つまり、col1列にNAがない行だけが選択されます。以上で、特定の列（ここではcol1）にNAを含む行が除かれます。

僕の家の最寄り駅の一つである千里中央が終点じゃなくなってしまった。北に2.5 km延伸し、箕面船場阪大前駅と、箕面萱野駅のふたつが新たにできた。 箕面船場阪大前駅周辺、つまりは船場と呼ばれるところは僕の生活圏内で歩いてでも行けるところ。ポパンクールカフェ、マザームーンカフェ、Cafe matinなど、素晴らしいカフェがたくさんあるところ。本当はあまり人は来てほしくないのだけど、これを気に発展してくれることは嬉しいかな。街全体がカフェになって欲しい。 土曜日に歯医者に行くのに、千里中央で電車に乗ったら、たくさん人がいた。特に先頭車両。みんな動画撮りたいんだな。今まで終点だったから、プラットフォームの左右どちらともなかもず行で、どちらかには電車が止まっていたからすぐ座れたけど、今は一方だけが中百舌鳥行になっている。これはちょっと不便。ただし僕の家は北千里も近いので、梅田とか行く場合は北千里から行ったほうがいい。 ２０２４年の３月２３日はだいぶ先だと思っていたけど、もう来てしまった。 路線図を見て思ったのだけど、箕面船場阪大前はM7、箕面萱野はM6。ということは将来的にもっと、延伸する予定！？

Canonicalタグとは、複数の同じ記事があったときに、これが本家ですよと示すもの。 NoteやZennなどにも書きたいから、このBlogger にCanonical tagをつけてみた。各記事につけるのが面倒なので、すべての記事に付ける方法をCopilotにきいてみた。 すると、htmlのヘッダーの部分に以下をいれると良いらしい。本当かどうかは知らない。  <b:if cond='data:blog.url == data:blog.canonicalHomepageUrl'>   <link rel="canonical" href='data:blog.url'/> <b:else/>   <link rel="canonical" href='data:blog.canonicalUrl'/> </b:if>

ここは高級パン屋。とてもいいところだが、家から遠いので歯医者のついでに行く感じ。あといつも並んでる。パンはどれも美味しそう。 <iframe class="hatenablogcard" style="display:block;width:100%;height:155px;margin:12px 0;max-width:680px;" title="%title%" src="https://hatenablog-parts.com/embed?url=https://maps.app.goo.gl/whazLY5bcdvrXUvG7" frameborder="0" scrolling="no"></iframe>

<iframe class="hatenablogcard" style="display:block;width:100%;height:155px;margin:12px 0;max-width:680px;" title="%title%" src="https://hatenablog-parts.com/embed?url= https://maps.app.goo.gl/NbH1hpBsLhfHxYfJA" frameborder="0" scrolling="no"></iframe> 結構いいお店。ちょうど入れた。ここは居心地がいいが、食べ物は結構普通かな。 <div class="separator" style="clear: both;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEh7NsuteLAJbhaNuT5syro6CQRaw5oayolM2Lk2Ntm6Dvlx7RWXiCAB56uUx45TiPcr78Jh02-yQam_p-rrj8iLY0iw404vJ_Oaly7FpW3hguAaea7-HoU8jkP_EgIptN5BDMaPdrAzxvOilLsXQe4XOZuT8wdOvZsdP8NitCDVfyFqEs6UeYcVNeca-Yw/s4624/PXL_20240323_032434457.jpg" style="display: block; padding: 1em 0; text-align: center; "><img alt="" border="0" width="320" data-original-height="3472" data-original-width="4624" src="https://blogger.googleuserc