Anwendungsfall:
- Es liegt eine oder mehrere Reihen Daten vor, die an einen Data Frame angeheftet werden sollen.
Lösung:
Erstelle einen neuen, temporären Data Frame, der die neuen Reihen enthält.
Füge den Data Frame an den originalen Data Frame, indem du die Funktion rbind()` verwendest.
Angenommen, wir haben einen Data Frame mit Pokemon-Daten:
library(readr)
pokemon <- read.csv("pokemon.csv", encoding = "UTF-8")
head(pokemon) # erste sechs Reihen ausgeben
Name Typ Region Level Kraftpunkte ASCII_Sprite
1 Pikachu Elektro Kanto 25 274 (⚡ᵔᴥᵔ⚡)
2 Charizard Feuer/Flug Kanto 36 360 🔥(╯°□°）╯🔥
3 Blastoise Wasser Kanto 36 362 💧ᕕ( ᐛ )ᕗ💧
4 Venusaur Pflanze/Gift Kanto 32 364 🌸(◕‿◕)🌿
5 Mewtwo Psycho Kanto 70 416 ✨(ಠ_ಠ)✨
6 Mew Psycho Kanto 100 404 ✨(◕ω◕)✨
Wir wollen eine neue Reihe anfügen:
pokeNeu <- data.frame(
Name = "Zamazenta",
Typ = "Kampf/Stahl",
Region = "Galar",
Level = 70,
Kraftpunkte = 362,
ASCII_Sprite = "🛡️🐺(ಠ_ಠ)🐺🛡️"
)
pokeNeu
Name Typ Region Level Kraftpunkte ASCII_Sprite
1 Zamazenta Kampf/Stahl Galar 70 362 🛡️🐺(ಠ_ಠ)🐺🛡️
Jetzt verwenden wir die rbind() Funktion, um den Data Frame an den existierenden dranzuhängen:
Name Typ Region Level Kraftpunkte ASCII_Sprite
1 Pikachu Elektro Kanto 25 274 (⚡ᵔᴥᵔ⚡)
2 Charizard Feuer/Flug Kanto 36 360 🔥(╯°□°）╯🔥
3 Blastoise Wasser Kanto 36 362 💧ᕕ( ᐛ )ᕗ💧
4 Venusaur Pflanze/Gift Kanto 32 364 🌸(◕‿◕)🌿
5 Mewtwo Psycho Kanto 70 416 ✨(ಠ_ಠ)✨
6 Mew Psycho Kanto 100 404 ✨(◕ω◕)✨
7 Lugia Psycho/Flug Johto 45 461 🌊(￣^￣)🌊
8 Ho-Oh Feuer/Flug Johto 45 461 🔥〈(￣︶￣)〉🔥
9 Celebi Psycho/Pflanze Johto 100 404 🍃(◠‿◠)🍃
10 Rayquaza Drache/Flug Hoenn 50 461 🐉═══════🐉
11 Kyogre Wasser Hoenn 45 383 🌊≋≋(◉◡◉)≋≋🌊
12 Groudon Boden Hoenn 45 383 ⛰️(ಠ益ಠ)⛰️
13 Dialga Stahl/Drache Sinnoh 47 461 ⚙️🐲(◉_◉)🐲⚙️
14 Palkia Wasser/Drache Sinnoh 47 461 💎🐲(⊙_⊙)🐲💎
15 Giratina Geist/Drache Sinnoh 47 461 👻🐲(¬_¬)🐲👻
16 Arceus Normal Sinnoh 80 493 ⭐(◉Θ◉)⭐
17 Reshiram Drache/Feuer Einall 50 461 🔥🐲(⌐■_■)🐲🔥
18 Zekrom Drache/Elektro Einall 50 461 ⚡🐲(ಠ‿ಠ)🐲⚡
19 Kyurem Drache/Eis Einall 50 461 ❄️🐲(╯︵╰)🐲❄️
20 Xerneas Fee Kalos 50 461 🦌✨(◕‿◕)✨🦌
21 Yveltal Unlicht/Flug Kalos 50 461 🦅💀(ಠ_ಠ)💀🦅
22 Zygarde Drache/Boden Kalos 50 486 🐍⬢⬡(◉_◉)⬡⬢🐍
23 Solgaleo Psycho/Stahl Alola 55 461 ☀️🦁(◉◡◉)🦁☀️
24 Lunala Psycho/Geist Alola 55 461 🌙🦇(◕‿◕)🦇🌙
25 Necrozma Psycho Alola 50 461 💎✨(╬ಠ益ಠ)✨💎
26 Zacian Fee/Stahl Galar 70 362 🗡️🐺(◕‿◕)🐺🗡️
27 Zamazenta Kampf/Stahl Galar 70 362 🛡️🐺(ಠ_ಠ)🐺🛡️