Menu

Skip to content
AppleScriptの穴
  • Home
  • Products
  • Docs
  • Events
  • Forum
  • About This Blog
  • License
  • 仕事依頼

AppleScriptの穴

Useful & Practical AppleScript archive. Click '★Click Here to Open This Script' Link to download each AppleScript

大きな数値同士の平均値を求める

Posted on 3月 26 by Takaaki Naganoya

大きな数字同士の平均値を求めるAppleScriptです。大きい数字というのは、桁数が(大きい方に)多いものと、小数点以下の桁数が多いものを指しています。

AppleScriptの数値は10桁ぐらいで指数表示になってしまう、一種のウィークポイントですが、数値を文字で保持することでこのように計算できます。

テキストで書いた数値をリストに入れて計算しますが、ヌル要素が入っていると問題になるのであらかじめヌル要素は削除するようにしています。

ちょうど、書籍の原稿で巨大な配列要素を追加するベンチマークを実施したさいに、5回実行してその平均値を求めるために書いたものです。

AppleScript名:大きな数値同士の平均値を求める
—
–  Created by: Takaaki Naganoya
–  Created on: 2021/03/26
—
–  Copyright © 2021 Piyomaru Software, All Rights Reserved
—

use AppleScript version "2.4" — Yosemite (10.10) or later
use framework "Foundation"
use scripting additions

set aList to {"", "0.4345240592956544", "0.3104130029678344192", "0.3132869005203247104", "0.2978630065917968384", "0.3173710107803344896"}

set c to aveLargeNumber(aList) of me

–AppleScriptの範囲外の精度の数値テキストの平均を計算する
on aveLargeNumber(aNumList as list)
  –ヌル要素の削除
  
set bNumList to listSweep1D(aNumList) of me
  
  
set aCount to count every item of bNumList
  
set aNumStr to retDelimedText(bNumList, " + ") of me
  
  
set aCMD to "echo \" scale=10; (" & aNumStr & ") / " & (aCount as string) & " \" | bc"
  
set aRes to do shell script aCMD
  
if aRes begins with "." then set aRes to "0" & aRes
  
  
return aRes
end aveLargeNumber

on retDelimedText(aList as list, aDelim)
  set aText to ""
  
set curDelim to AppleScript’s text item delimiters
  
set AppleScript’s text item delimiters to aDelim
  
set aText to aList as string
  
set AppleScript’s text item delimiters to curDelim
  
return aText
end retDelimedText

–1Dリスト項目のうち、ヌルの項目はリストから除去する
on listSweep1D(aList as list)
  set bList to {}
  
repeat with i in aList
    set j to contents of i
    
if j is not equal to "" then
      set the end of bList to j
    end if
  end repeat
  
return bList
end listSweep1D

★Click Here to Open This Script 

More from my site

  • Pagesで最前面の書類中のテキストアイテムと本文テキストで文字サイズが最大のもののテキストを求めるPagesで最前面の書類中のテキストアイテムと本文テキストで文字サイズが最大のもののテキストを求める
  • 最前面の書類中のテキストアイテムの文字サイズが最大のものの中に入っている最大のテキストを求める最前面の書類中のテキストアイテムの文字サイズが最大のものの中に入っている最大のテキストを求める
  • アウトプットするとインプットもある?アウトプットするとインプットもある?
  • Macとアップルスクリプトで学ぶ いまからはじめるプログラミング②Macとアップルスクリプトで学ぶ いまからはじめるプログラミング②
  • 「Macとアップルスクリプトで学ぶ いまからはじめるプログラミング①」アップデート「Macとアップルスクリプトで学ぶ いまからはじめるプログラミング①」アップデート
  • 「Macとアップルスクリプトで学ぶ いまからはじめるプログラミング①」オマケアップデート予定「Macとアップルスクリプトで学ぶ いまからはじめるプログラミング①」オマケアップデート予定
Posted in Number | Tagged 10.14savvy 10.15savvy | Leave a comment

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

電子書籍(PDF)をオンラインストアで販売中!

Google Search

Popular Posts

  • Script Editorをコントロールして各構文要素の色情報を取得する v5
  • ディスプレイの設定切り替えをAppleScriptでも行えるSwitchResX
  • CotEditorのScript集、PowerPack & Basic Packを配布開始
  • 画面上の指定座標にマウスカーソルを強制移動させてクリック
  • CotEditorのScript集、PowerPack & Basic Packをv2.0にアップデート
  • 文字置換 v2
  • 文字列から絵文字を削除
  • Xcode 10.1+macOS MojaveでGUIアプリケーションを作成
  • iCloud Driveフォルダへのパスを求める
  • Pages書類の1ページ目の表の背景色を置換
  • アラートダイアログをタイトル付き表示
  • mouseClickを用いて指定座標をクリック
  • macOS 10.14 AppleScriptリリースノート
  • Safariで表示中のWebページの最終更新日時を取得
  • 【基礎】AppleScriptの実行を(操作により)中断する
  • AppleScriptの情報源
  • GET method REST API v4.3
  • 指定URLのMS名を取得する v2
  • 原稿用紙枚数シミュレーション(簡易版)v1
  • 指定文字の花文字テキストを取得する(Retina対応)

Tags

10.11savvy (1109) 10.12savvy (1249) 10.13savvy (1389) 10.14savvy (531) 10.15savvy (325) 11.0savvy (133) CotEditor (48) Finder (43) iTunes (25) Keynote (66) NSAlert (59) NSAlertSecondButtonReturn (16) NSArray (50) NSBitmapImageRep (20) NSBundle (19) NSButton (33) NSColor (48) NSDictionary (26) NSFileManager (23) NSFont (18) NSImage (40) NSJSONSerialization (21) NSMutableArray (61) NSMutableDictionary (21) NSPredicate (36) NSRunningApplication (55) NSScreen (30) NSScrollView (22) NSString (114) NSURL (93) NSURLRequest (22) NSUTF8StringEncoding (30) NSUUID (18) NSView (33) NSWindow (17) NSWorkspace (19) Numbers (43) Pages (19) Safari (34) System Events (16) WKUserContentController (20) WKUserScript (19) WKUserScriptInjectionTimeAtDocumentEnd (17) WKWebView (21) WKWebViewConfiguration (21)

カテゴリー

  • AirDrop
  • AirPlay
  • Animation
  • AppleScript Application on Xcode
  • Bluetooth
  • Books
  • boolean
  • Bug
  • Calendar
  • call by reference
  • Clipboard
  • Code Sign
  • Color
  • Custom Class
  • dialog
  • drive
  • exif
  • file
  • File path
  • filter
  • folder
  • Font
  • GAME
  • geolocation
  • GUI
  • GUI Scripting
  • History
  • How To
  • Icon
  • Image
  • Input Method
  • Internet
  • JavaScript
  • JSON
  • JXA
  • Keychain
  • Language
  • list
  • Locale
  • Machine Learning
  • Markdown
  • Menu
  • Metadata
  • MIDI
  • MIME
  • Natural Language Processing
  • Network
  • news
  • Noification
  • Notarization
  • Number
  • OCR
  • OSA
  • PDF
  • Peripheral
  • PRODUCTS
  • QR Code
  • Raw AppleEvent Code
  • Record
  • recursive call
  • regexp
  • Release
  • Remote Control
  • Require Control-Command-R to run
  • REST API
  • RTF
  • Sandbox
  • Screen Saver
  • Script Libraries
  • sdef
  • search
  • Security
  • selection
  • shell script
  • Sort
  • Sound
  • Spellchecker
  • Spotlight
  • SVG
  • System
  • Tag
  • Telephony
  • Text
  • Text to Speech
  • timezone
  • Tools
  • Update
  • URL
  • UTI
  • Web Contents Control
  • WiFi
  • XML
  • XML-RPC
  • イベント(Event)
  • 未分類

アーカイブ

  • 2021年4月
  • 2021年3月
  • 2021年2月
  • 2021年1月
  • 2020年12月
  • 2020年11月
  • 2020年10月
  • 2020年9月
  • 2020年8月
  • 2020年7月
  • 2020年6月
  • 2020年5月
  • 2020年4月
  • 2020年3月
  • 2020年2月
  • 2020年1月
  • 2019年12月
  • 2019年11月
  • 2019年10月
  • 2019年9月
  • 2019年8月
  • 2019年7月
  • 2019年6月
  • 2019年5月
  • 2019年4月
  • 2019年3月
  • 2019年2月
  • 2019年1月
  • 2018年12月
  • 2018年11月
  • 2018年10月
  • 2018年9月
  • 2018年8月
  • 2018年7月
  • 2018年6月
  • 2018年5月
  • 2018年4月
  • 2018年3月
  • 2018年2月

https://piyomarusoft.booth.pm/items/301502

メタ情報

  • 登録
  • ログイン
  • 投稿フィード
  • コメントフィード
  • WordPress.org
Proudly powered by WordPress
Theme: Flint by Star Verte LLC