Title: | SGF (Smart Game File) File Format Import |
---|---|
Description: | Import SGF (Smart Game File) into R. |
Authors: | Brad Cable |
Maintainer: | Brad Cable <[email protected]> |
License: | MIT + file LICENSE |
Version: | 1.0.0 |
Built: | 2025-02-21 03:29:02 UTC |
Source: | https://github.com/cran/Rsgf |
Imports SGF (Smart Game File)
loadSGF(filename, game.number=1) playerCard(player_names, sgf_paths) boardHeatMap(data) getColorPalette(count) SGFGame(moves)
loadSGF(filename, game.number=1) playerCard(player_names, sgf_paths) boardHeatMap(data) getColorPalette(count) SGFGame(moves)
filename |
Path to SGF filename |
game.number |
Value to return for Game.Number, useful for multiple game loading into the same data.frame |
player_names |
Player name (or player names as vector) to return results for |
sgf_paths |
Path to SGFs or directories that contain SGFs (or paths as vector) |
data |
Aggregate data.frame with X, Y, and Count columns representing the Go/Baduk board |
moves |
moves returned by playerCard() |
count |
count of graded levels for getColorPalette() |
loadSGF() returns a data.frame playerCard() returns a data.frame boardHeatMap() returns a ggplot2 graphics object getColorPalette() returns a list of colors based on the count provided for the default Rsgf Go theme SGFGame() returns an RC/S4 object
Brad Cable
# loading lots of SGFs library(Rsgf) test_data_dir <- system.file("sgf", package="Rsgf") player_data <- Rsgf::playerCard("Honinbo Shusaku", test_data_dir) # Simple aggregation for heatmap: agg_games <- aggregate(Game.Number ~ x + y, data=player_data, FUN=length) names(agg_games) <- c("x", "y", "Count") agg_games$Count <- as.factor(agg_games$Count) # Graph heatmap Rsgf::boardHeatMap(agg_games) # Extended Player Card and Heatmap Examples # https://bcable.net/analysis-Rsgf_period_cards.html # https://bcable.net/analysis-Rsgf_moves_anim.html # https://bcable.net/analysis-Rsgf_player_card.html
# loading lots of SGFs library(Rsgf) test_data_dir <- system.file("sgf", package="Rsgf") player_data <- Rsgf::playerCard("Honinbo Shusaku", test_data_dir) # Simple aggregation for heatmap: agg_games <- aggregate(Game.Number ~ x + y, data=player_data, FUN=length) names(agg_games) <- c("x", "y", "Count") agg_games$Count <- as.factor(agg_games$Count) # Graph heatmap Rsgf::boardHeatMap(agg_games) # Extended Player Card and Heatmap Examples # https://bcable.net/analysis-Rsgf_period_cards.html # https://bcable.net/analysis-Rsgf_moves_anim.html # https://bcable.net/analysis-Rsgf_player_card.html