nozma

# coding: utf-8
s = input().split()

target = [1, 5, 6, 7, 8, 9, 15, 16, 19]

result ={}

for i in range(len(s)):
    if i + 1 in target:
        result[i+1] = s[i][:1]

nozma

# coding: utf-8
import re

s = input()

# カンマとコンマを除外してから単語毎のリストに分解
s = re.sub('[,.]', '', s)
s = s.split()

# 文字数をカウントしてリスト化

nozma

# coding: utf-8

s1 = 'パトカー'
s2 = 'タクシー'

s = ''.join([i+j for i, j in zip(s1, s2)])
print(s)

nozma

lazy fmaps -u='https?://reader\.aol\.co\.jp/.*' gh gs gd ga go gx ? r = - f u j k <Space> <S-Space> t v <Return> m 1 2 3 4 5 /
lazy fmaps -u='https?://reader\.aol\.co\.jp/.*' -events=vkeydown J K N P X O A

nozma

data("UScitiesD")
hc <- hclust(UScitiesD)
plot(hc)

nozma

df <- data.frame(a = letters[1:3],
                 b = c("あ", "い", "う"))

nozma

library(sf)
# 日本地図のシェープファイルを読み込む
f <- "N03-160101_GML/N03-16_160101.shp"
japan <- st_read(f)

nozma

  runner:
    scopes:
      python: "python3"

nozma

library(ggplot2)
library(dplyr)

# hwy : highway miles per gallon
#  1mile == 1.60934km
#  1gallon == 3.78541L
#  ∴ mile / gallon = 1.60934 / 3.78541 km / L

mpg2kpl <- function(x) x * 1.60934 / 3.78541

nozma

p <- ggplot(mpg, aes(displ, hwy)) +
  geom_point() +
  facet_wrap(~drv) +
  theme_bw() +
  theme(panel.grid = element_blank()) +
  geom_smooth(method = "lm")