oscai {openscoring}R Documentation

Score with an AI A basic function to score the creativity with an AI. See the OpenScoring site for more information. Requires an internet connection.

Description

Score with an AI A basic function to score the creativity with an AI. See the OpenScoring site for more information. Requires an internet connection.

Usage

oscai(
  df,
  item,
  answer,
  model = c("1.6", "1-4o", "davinci3", "chatgpt2", "1.5", "chatgpt", "babbage2",
    "davinci2"),
  language = "English",
  scores_col = ".originality",
  quiet = FALSE
)

Arguments

df

A data frame.

item

The column name of the items or other kind of prompt.

answer

The column name of the responses. Commas will be replaced with spaces for scoring.

model

The model to use. Should be one of "1.6", "1-4o", "davinci3", "chatgpt2". Deprecated models are kept for compatibility.

language

The language of the input. Only works for the 1.5 model upwards. Should be one of "Arabic", "Chinese", "Dutch", "English", "French", "German", "Hebrew", "Italian", "Polish", "Russian", "Spanish".

scores_col

The column name to store the scores in. Defaults to ".originality".

quiet

Whether to print the citation reminder.

Details

Available models:

Value

The input data frame with the scores added.

Examples

df <- data.frame(
  stimulus = c("brick", "hammer", "sponge"),
  response = c("butter for trolls", "make Thor jealous", "make it play in a kids show")
)

df <- oscai(df, stimulus, response, model = "davinci3")

# The 1.5 model and upwards works for multiple languages
df_polish <- data.frame(
  stimulus = c("cegła", "młotek", "gąbka"),
  response = c("masło dla trolli", "wywoływanie zazdrości u Thora", "postać w programie dla dzieci")
)

df_polish <- oscai(df_polish, stimulus, response, model = "1.5", language = "Polish")


[Package openscoring version 1.0.4 Index]